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1.0 ABSTRACT 
This diagnostic is divided into three basic sections: 
1. A check of the console terminal interface logic 


2. A check of the printing characteristics and control logic 


3. An echo portion designed to check the keyboard and to aid in 
the diagnosis of terminal problems. 


Patterns used by the printing tests were chosen for ease of visual 
‘erification. The echo tests were designed for maximum flexibility, 
with Test 24 allowing any desired pattern to be used. 


O REQUIREMENTS ae 
1 EQUIPMENT AND ASSIGNMENTS 


hoe ’ 


The diagnostic is written to run on all models of the PDFI1 computer 
with either a KLi1 or DL11 console terminal interface. The diagnostic 
is preset to test up to 16 additional terminals (on DL11'S) assigned 
between addresses 776500 and 776676. This preset quantity (16) and 
preset address (776500) can be changed by depositing the quantity in 
DLNR and the starting address in DLADR. For example, to allow for up 
to 31 additional terminals. the address 775610 could be placed into 
DLADR and the octal equivalent of 31, ie., (37) wouid be placed into 
DLNR. The number of additional OL11'S actually tested will be 
adjusted automatically downward based upon the first DL11 address 
(within the imp!ied range) found to be unresponsive. Thus if there is 
no ODL11 present to match the address in ODLADR only the console 
terminal will be tested. Therefore, all ODL11'S in excess of the 
console terminal must have contiguous address assignments with the 
lowest address corrosponding to the value in DLADR. 


The console terminal (assigned standard) can be reassigned by placing 
the address of its receiver status register into CONADD and its 
receiver interrupt vector into CONVEC. This reassignment can be made 
to a terminal within the set cf terminals implied by OLNR and DLADF 
without odverse effect. Note that a terminal with a slower speed (if 
any) will determine the speed oat which al! of the terminals are 
tested. Such a terminal should generally be excluded from the test, 
or tested seporately. ‘Refer to the symbo: definitions in the listing 
for the above mentioned locations. ) 


2.2 STORAGE 


The diagnostic program uses al! of YK of memory with erception of the 
oreo used by the absolute loader. 


SEQ 0003 


| 
| 
| 
| 
| 
| 
| 
| 
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2.3 PRELIMINARY PROGRAMS 


Any applicable PDP-11 diagnostics should be run on the processor. \f 
any errors are encountered during the interface check, refer to the 
appropriate interface diagnostic for further help in locating the 
problem if needed. 


<.4 ADDITIONAL PROGRAMS 


TH1S- DIAGNOSTIC 1S FOR VERIFICATION OF BASIC TERMINAL FUNCTIONS ONLY 
“) 1— THE TERMINALS UNDER TEST HAVE HARDWARE OPTIONS INSTALLED RUN 
DIAGNOSTIC MDEC-11-DZLAF-A . the LA36 TERMINAL OPTIONS TEST 


3.0 LOADING PROCEDURE AND INITIALIZATION 


Load the LA36 diagnostic program tape following normal procedures 

Before starting the progrom, refer to the description of the routine 
“DLY". Time delays used by the program ore a function of the CPU 
model and memory type and should be set-up before running the 
diagnostic. The routine is preset for a PDP-11/05 with core memory. 
Refer to Section 2.1 for non-standord terminal addresses and for 
testing multiple DL11 interfaces. 


if a hordwore switch register does not exist, the program will use the 
contents of location 176 as the value of the switches. Therefore, be 
sure to lood location 176 with the switch value before starting the 
program when not using hardware switches. 


if the CPU is an LSI-11- 11/03 be sure to set switch register bit 9 to 
o 1. Special tests are run on the DLV11 interface 


4 QO STAPTING PROCEDURE 
4 1 STARTING ADDRESSES 
200:8) = Run with switcn register Control 
- perform console terminal 1/0 tests. 
204«8) = Run with switch register Control 
- skip console terminc! i/0 tests 
21018) = Run with Keyboard Control 
- perform Console Terminal 1/0 tests. 
214(8) = Run with Keyboard Control 
- skip console Terminal 1/0 tests 
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4.2 Switch Register Control With 170 Tests 


A. Set the switch register to 200(8) and press the load address 
switch 

B. Set switch register bit 9 toa 1 if the processor is an 
LSi-11, 11703. Refer to Section 5.1.5 . 

C. Set the switch register bits 7-0 equal to the poper width in 
terms of the number of columns (octal). Refer to Section 
6.1.8 

tC. Set the switch register bit 8 equal to 1 or O and press the 
stort switch. message will be printed indicating the 
number of DLil's being tested. Refer to Section 5.1.6 

Ee if bit 8 were zero when starting, the Printer tests ore 
e-ecuted sequentially, after the entire series of |/0 tests 
ure executed. 

F. {tf bit & wos set when the stort switch was pressed, the 
entire series of 1/0 tests will be executed and The program 
will then be waiting for control via the switch register. 
the CPU will halt at location SELHLT. 

4 3 Switch Register Contro! - Without 1.0 Tests 


Same os Section 4.2 except in step A. set the switch register to 


2048) 
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4 4 teyboard Control - Witn 170 Tests 


A. Set the switch register to 210(8) and press the load address 
switch. 


B Set the switch register bits 7-0 equal to the paper width in 
terms of the number of columns (octal). Refer to Section 


5.1.8 

C Set switch register bit 9 toa 1 if the processor is an 
LS!-11, 11/03. Refer to Section 5.1.5 

C. Set switch 8 and Press the Stort switch. A message will be 
printed indicating the number of DLIi's being tested Refer 
tc Section 5.1.6 

E if bit &§ was zero when starting, the prirter tests ore 
e,ecuted sequentially after the entire series of 1/0 tests 
ere executed. 

Fo of bit & were set when the stort switch wos pressed, the 
entire series of 1/0 tests will be erecuted followed by the 
select test message The program wil! then be waiting for a 
test selection ig any terminal kevboord Peter to Section 
$.2 ‘ 

4S Keyboord Control - Without | 0 Tests 


Some as Section 4.4 except in step A. set the switch register to 
214 «§). : 


. 


a 
5.0 OPERATING PROCEDURE 
The progrom can be controlled in either of - two methods: bv the 


consc!2 switch register or from the kevboard of the terminal's! under 
test 


SEQ 0006 
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5.1 SWITCH REGISTER CONTROL 


The vorious switches and their functions are listed below. Switches 
may be changed and set as desired except as noted in the specific 
switch descriptions. Refer to the detailed switch descriptions for 
further, more complete information. 


SWITCH NUMBER DESCRIPTION 
15 1fup) = HALT AT END OF TEST 
O(down) = CONTINUE TEST SEQUENCE 
14 1 (up) = CONTINUE ON ERROR 
O(down) = HALT ON ERROR 
1 (up) DRIVE ONLY CONSGLE TERMINAL 


O(down) = DRIVE ALL TERMINALS 


11 1 (UP) = LOOP ON INDIVIDUAL TEST 
Otdown) = NORMAL TEST SEQUENCE 


9 1iup) = CPU TYPE IS AN LSI-11, 11/03 
Otdown) = ALL OTHER PDP-11'S 


8 ifup) = RUN TEST ONCE AND HALT 


O1DOWN) = LOOP ON TEST SEQUENCE 
5-0 TEST NUMBER SELECTION 
7-0 NUMBER OF COLUMNS AT STAFT-UP 


5.1.1 Switch 15 


With switch 15 in the up position, the program will halt at the end of 
the current test. Replacing switch 1 to the down positior and 
pressing CONTINUE will continue the norma! test operation. During the 
hait. an. of the contro! switches may be charged or set as desired. 


5.1.2 Switch 14 


Placing switch 14 in the up position will cause the program to 
continue on errors during any of the I-0 tests only With switch 14 
down, the program will halt (at ERRHLT) on any errors during the 1-9 
tests with the locaticn of the errer in RO. Pressing CONTINUE will 
cause the program to continue if switch 14 is down. With switch 14 
vp. pressing continue will cause the program to loop on the error. 


SEQ 0007 


SSS 
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NOTE 


Error halts can occur only durin the 
1/0 tests. The terminal is connected to 
a serial line and there is no error 
information returned to the program from 
the terminal. Therefore the program 
cannot report errors occurring in the 
termineol!. Errors detected ea the 
interface tests will result in halts as 
described above 


5.1.3 Switch 13 


Piacina switch 13 in the down position will couse the driving of all 
multiple terminals during the Printer tests only. If switch 13 is up, 
only the console terminal is driven 


kk Note: Switch 13 should onty be changed when the program is waiting 
for a test selection . 


ee 


5.1.4 Switch 11 a 
Placing switch 11 up at~any time will couse the program to loop on the 
current test as !ona as switch 11 remains up. Replacing switch 2 down 
will cause the program to resume norma! operation at the completion of 
the test. 


5.1.5 Switch 9 


Placing switch 9 up at the start of the test wil! cause an automatic 
change in the DELAY timeing, and the execution of special DLV11 1.0 
tests. The OLV1i has no maintenance mode ond wil! cause the program 


to hang if tested as o DL11. 


5.1.6 Switch § 


With switch § in the down position the program will continue to loop 
through the present test sequence. Placing switch 8 up will cause the 
program to holt (at SELHLT) at the completion of the current test. 
After the halt set the contro! switches as desired and set switches 5 
to 0 to the next desired test number ther press CCNTINUE to start the 
test. 


When starting the diagnostic the operator can select a specific test 
rather than automatically starting the printing test sequence by 
setting switch S up before starting the diagnostic. Upon completion 


SS eee 


SEQ 0008 


a 


| 
| 
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of the 1/70 test sequence (if being run) the progrom will either halt 
at SELHLT woiting for a test selection via the switch register or 
print the select test message and woit for o test selection from any 
veyboard. Refer to Section 4 for further information. 


5.1.7 Switches 5 to 0 


Switches 5 to Q are used to select specific tests when under switch 
register control. Test numbers are always in octa! 


6.1.5 Switches 7 to O (at start-up only) 


G+ start-up only, switches 7 to 0 are used to set the desired maximum 


number of columns the diagnostic is to test. If the number set is 
greater thon 122110) or less than 30(10), the program will default to 
132010). The value set must be in octal form. Thus. for normal 
operation - testing the full 1232 (10) columns - leave switches 7 - 0 


down. 





SEQ 0009 
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5.2 KEYBOARD CONTROL 


The program will be under keyboard control whenever the diagnostic is 
started at location 210 or 214. Switches on the console switch 
register will have no effect when under terminal control except for 
switch 15. The 170 tests cannot be selected when under keyboord 
control. 


To stop a test at any time, type the "RUBOUT" or “DELETE” key on any 


keyboard. Any terminal may stop the test and select the next test if 
switch 13 is down. When a test is stopped by typing a "“RUBOUT”" or 
DELETE. the test will terminate and the following message will be 
tvped: 


SELECT TEST NUMBER 


St this time. type the desired test number followed by any one of the 
foliowina contro! characters 


(period) = Run the selected test once and return for another 
test selection. 
L = Loop on the selected test until a "“RUBOUT" is 
typed. 
S = Start the test sequence with the selected test. 


Continue to loop on the printing test sequence 
until a "RUBOUT” is typed 


The "L" or "S" may be either upper or lower case, but the test number 
must always be o 2 digit octal number. The test number and terminator 


are echoed by the program, thus each character will be printed twice 
if the terminal is in half duplex. For al! echo tests, the "L" and 
"S" will only run the test once (the same as if typing a period). For 
ali option tests, the "S" will only run the test once (the some as if 
typing a period), however, typing an "L" will cause the program tc 
loop on the selected test. If on error is detected in the test 
selection (illegal test number or control character) a question mark 
is printed and the message will oe repeated 


—_—_——~ 


SEQ 0010 


caiman 
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6.0 TEST DESCRIPTIONS 


6.1 PRINTING TESTS 


These tests ore designed as a test of the printing mechanism and the 
associated control logic. At the beginning of each test, the test 
number will be printed indicating which test is being executed and, if 
the test is a function of the number of columns, the rumber of columns 
being tested will be indicated. A detailed description and sample 
patterns for each printing test follows 


® 1.1 Test 0 - Dato Path Test 


This test is used to test the data I'nes to and through the interface 
and to the terminal. An alternating bit pattern is sent which will 
print org k's and U's in a checkerboard pattern to the maximum 
column width. he starting character for each line is a!ternated and 
ao total of four lines are printed 


With the Auto Line Feed Option set to produce an automatic line feed 
after every received corriage return, there will be o blank line 
between eoch printed | ine. 


EXAMPLE: 
KUXUXUKUKUKUKUXUXUKUXUKUFUKUKU 
UXUXUKUXUSUKUKUKUKUKUKUKUKUKUS 


*UKUKUKUKUKUKUKUKUXUZUKUKUAUAU 
UXUXUKUKUXUKUXUFUCUSUSUKUXUEUE 


61.2 Test 1 - Printable Character Test 


This test produces ao check of al! 94(10) printable characters. The 
characters are printed in groups of three with three groups per line. 
separated by three spaces between groups. The first column will 
contain all ASCII codes from 040 to 077. Column two will contain ali 
ASCI! codes from 100 to 137 - primarily the capital letter set. The 
last column wil! contain al! ASCII codes from 140 to i76 - primarity 
the small! letter set. 

With the Auto Line Feed Option set to produce an automatic tine feed 
after every received carriage return, there will be a blank line 


between each printed line 


re emenaneoemne: 
| 


SEQ 0011 
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EXAMPLE: 
ddd shite 
ri AAR oaa 
"BBB bbb 


LLL ‘an 
“<< MMM mmm 
NNN nnn 
000 000 


6 1.3 Test 2 - Nur-printable Character Test 


This test checks al! non-printable characters that have no control 
function in the LA36 terminal or the LA36 options (such as CR. LF. BS, 
& BEL). First the ASCII code will be printed followed by the mnemonic 
after a few seporating spaces. Following the mnemonic, the actual 
control character will be sent three times and nothing should happen 
at the printer. This pattern is repeated. three times on a line, 
until all of the non-printing choracters have been tested 


With the Auto Line Feed Option set to produce an automatic line feed 
ofter every received corriage return, there will be a blank line 
between each printed line 


SEQ 0012 


” 





EXAMPLE: 


001 SOH O02 STX O06 ACK 
020 OLE O21 OCi O22 OC2 
023 OC3 O24 ODC4Y O25 NAK 
026 SYN O27 ETB O30 CAN 
O31 EM 032 SUB O34 FS 
035 GS 036 RS 037 US 
177 = DEL 


» 1.4 Test 3 - Carriage Return Test 


This test checks the carriage return from all even numbered columns 
and the spacing of the solenoid head from the left morgin. It is also 
a goud check for proper operation of the position decoder. 


The test prints a full line of alternating O's and spaces. starting 
with a 0. At the end of the line the print head is returned to the 
left margin with a corriage return. The spaces are then filled in by 
spacing the print head out from the left margin to the first space, 
printing on “X", ond executing ao carriage return. This pattern is 
repeated unt:! the line is completed. Check to see that all X's are 
in the middie of the space between the two zeroes on either side of 
it. 


EXAMPLE: 

OXOXCX0X0XO0X0X0X0¥CX0X0xX0x0X0x 
With the Avto Line Feed Option set to produce an automatic line feed 
after every received corriage return. this test will print a tine of 


O's and spaces. then print o diaginal line of X's. Te correct! chech 
the encoder. the Auto Line Feed Option should be disabled 





Es eMPLE 
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6.1.5 Test 4 - Multiple Line Feed Test 


This test checks the line feed capability of the printer by sending 
various groups of line feeds interspaced with reference lines. The 
number printed as the reference line indicates the number of line 
feeds thot follow. The first and last lines also contain a string of 
dashes os reference points for measuring, the total distance is 63(10) 
lines between the two dashed lines. 


With the Auto Line Feed Option set to produce an automatic line feed 
atter every carriage return, the number printed wil! indicate one less 


than the number of line feeds (the number of blank. lines?:.that follow. 


The total distance between the two dashed Times. will. then be 69 lines 


~ 


t AMPLE: De We wn, So fuk een 2 


eee ied 


os 


16 


15 Blank Lines 


71 Blank Lines 


SEQ 0014 


a i a ee 
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6 1.6 Test 5 - Single Line Feed Test 

This test is designed to check the timing of single line feeds and the 
capability of a line feeds in all columns. Two reference lines 
are used by this test (and Test 6) which also can be used to easily 
check the number of columns the printer is printing 


The first reference line contains 130(10) zeroes followed by two 2's 


if testing 132(10) columns. lf less than 132 columns, the line 
will contain O's for two less than the maximum number of columns 
followed by the two 2's. This reference line is a quick check 


tor 132(10) columns if testing the full 132(10) columns. he second 
reterence line prints a string of numbers ( 1 to 980 ) repeated to 
the maximum column. This line, again, can be used as o quick check of 
the number cf columns. 


The iine feed test is accomplished by: printing the first reference 
line of O's and two 2's; then either sending 60(10) 3's, if 
testing 132(10) columns, or waiting 1.8 seconds for an LCV, if testing 
less than 132(10) columns. lf testing 132(10) columns, nothing 
should happen, except for on LCV. at the end of the line. The 3's 
should be lost and never printed. After the LCV. with the print head 
ot the extreme right. ao carriage return - line feed will be _ sent 
followed by repeated backslashes " " and linefeeds to print a diagonal 
line down the poper. When a backslash is printed in the maximum 


column, a carriage return will be sent immediately after the line feed 
and the second reference line of sequential numbers will be printed 
After completing the line, a corriage return - line feed will be sent 
and the program wiil wait one second for the carriage return function 
to complete. After the delay, the reference line will be repeated, 
the last line being guaranteed to be correct. Any timing problems 
during the line feeds will show os miss prints or missing characters 
during the first 16(10) characters of the middie reference line 
Also. any paper feed problems wi!! cause miss-alignment of the slashes 


forming the diogona! line 
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SEQ 0016 
EXAMPLE | 
000000000000000000000000000022 | 
t 
12345678901 2345678901234567890 
1234567890123456789012345607890 
With the Auto Line Feed Option set to produce an automatic tine feed 
after ever. received corriage return, there will be o blark ‘ine ever» 


place o carriage return is executed 


a 
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EXAMPLE 


0000000022 


1274507890 


1224567596 


6.1.7 Test 6 - Bacispace Test 


This test is designed to test the print timing as in Test 5 as well as 
the backward and forward movement of the print solenoid head 


The test consists of the same first reference line as in Test 5 then 

@ corrioge return-liine feed A full tine is then printed using the 

following pattern: 
Forword Slash = ae 

Backspace 

Rock Slash “—S 


This pattern produces o line of al! X's. The two slashes should cross 
exactly at the middie, producing the X character When the line is 
completed o corriuge return-line feed is sent and the last two 
reterence tines are printed as in Test 5. Any timing problems wi!! 
show in the first 16(10) characters of the middie reference line: 
again as in Test 5. 


With the Auto Line Feed Option set to produce an automatic line feed 
efter every received corriage returr. there will be a biank line 
between eoch printed line 


EXAMPLE: 


000000000000000000000000000022 
XXXXXXXXXXXXAXXXXXXXAXKXRAXK KA KN 
12345678901 2345678901234567890 
12345678901 2345678901234507890 
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61.2 Test 7 - Overprint Test 


This test is designed to check the —— and repectoble printing 
characteristics of the printer. hree rows of choracters ore each 
overprinted two times. The rows consist of the following chorocters 
alternated across the line 


Pow 1 M-SP 
Row 2 SP-@ 
Row 2 &-SP 
The resulting pattern wiil be a checkerboord pattern and the 


>-erprinted characters should be aligned property with the initial 
fhoracters. 


£-AMPLE 
MMMAMAMMMAAR AA 
@aavg@adad@dd@adecadddaad 
SRBRREBRERERRERRBSE 
With the Auto Line Feed Option set to produce an automatic line feed 
ofter every received corriage return, the lines wit! not be 
overprinted. There wi!! be three lines of each choracter with a blank 


line between each group of characters The characters in each group 
should be in the same columns 


EXAMPLE: 


SEQ 0018 
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6 1.3 Test 10 - Printing Frequency Sweep Test 


This test prints the character "H" repeatediy, 30(10) characters per 
tine for four lines. During the first two lines. the time interval 
between characters is increased from 30(10) milliseconds to 1.8 
seconds using the following formula to create a loc :thaic increase 


New Delay = Old Delay + Old Delay/16 + Old Delay/128 


The tast two lines do just the reverse. The time interval between 
“harecters is decreased from 1.8 seconds to 20(10) milliseconds 
s na the following formula to again create ao logrithmic decrease 


New Delay = Old Delay - Old Delay/16 - Old Delay/128 


ooh for possible miss-alignment of the choracters or spoces between 
characters as an indication of timing problems 


With the Auto Line Feed Option set to produce an automatic line feed 
after every received corriage return, there wil! be a blank line 
between each printed line 


EXAMPLE: 


HHHHHHHHHHHHHAHHHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHHHHHHHHHHHHHHHHH 
HHHHHHHHHHHHHRHHHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHHHHHHHHAHHHHY HH 


6.1.10 Test 11 - Ribbon Feed Test 


This test checks tne ribbon feed mechanism by printing ao single column 
of 24 tines of X's down the left hand margin of the page Visually 
check for proper operation of the ribbon feed mechanism during this 
test 


ith the Aute Line Feed Option set to produce an automatic tine feed 
atter every received carriage return. there will be a Blank tine 
petween cach printed line 


Ex. ample 


x 
Xia 
¥ 
Bao 
¥ 
Axo 
Pi 
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6 1.11 Test 12 - Printer Bell Test 


This test checks the printer bell buffer to insure that eight bells 
are distinctly heard, even when sent at the maximum transfer rate. 
The pregram sends §& bell codes at the maximum rate to the printer 
then waits 2.5 seconds to allow the operator to heor the bells. 


6 1.12 Test 17 - Life Test 


This test runs continuously and is run as an individual, special test, 
* 1s not part of the standard printing test sequence. 


This test prints 2 lines of each printable character ond then repeats 
continuously. The second line of each choracter is overprinted 4 
¢:mes to conserve paper. At the end of each complete pass through the 
choracter set a message is printed indicating the number of passes 


executed If any character (except "Rubout") is typed on the keyboard 
during this test, the pattern will change and restart with the typed 
choracter This wil! only happen if kevboard control is nn use 
EXAMPLE: 


RARARRARRARAAAARARARARAAAAARAR 
AARARARARRARARARARARARAARARAAA 
BBBBBBBBBBBBBBBBBEBBEBBEBBBBEB 
BBBBBBBBBBBBBBBBBBBBBBBBEBSEBB 


if the Auto Line Feed Option is set to produce an automatic tine feed 
after every received carriage return, the test will print six lines of 
each character with a blank |ine between the first and second livres as 
wel! as between each group of characters. 


E¥OMFLE 
ARRARRARARRARRA 


RAARARARARAAAARA 
RARRARARRAARRARA 
AARAARARRARARAA 
ARARRARRARAAARAAR 
ARARARARARARAAR 


BBBBBBBESBBBBBE 
BBBBBBBBBBBBEBB 
BBBBBBBBBBBBEBB 
BBBBBBBBBBBBBEB 
BBBBBBBBESBBEBE 


SEQ 0020 


























6 2 ECHO TESTS 


These tests are designed aos o test of the keyboard and an aid in 


isolating troubles within the terminal. t the beginning of each 
test. the test number will be printed indicating which test is being 
executed. Typing a “RUBOUT" or "DELETE" at any time, whether in 
keyboard control or not, will exit the current Echo test and print oa 
test termination message. \f in keyboord control, the select test 
message will be printed and the progrom will await a test seiection as 
usual. In switch register control, the program will halt (at SELLHLT) 


waiting for control via the switch register. A detailed description 
“tf each test follows: 


e 21 Test 20 - Choracter Echo Test 

This test ‘s designed to operate the terminal in a simulated 'ocal 
mode. Any cheracter typed on the hLeyboord (except a “rubout") will be 
echoed to the orinter. 


if the LA36 terminai is in half duplex with the Auto Line Feed Option 
available. typing ao carriage return may cause a gortied response an 
the termina! during this test 


6.2.2 Test 21 - Line Echo Test. Fast Pate 


This test continually sends full lines of any choracter up to. the 

moximum column width. The test prints a “O" choracter when started 

until a key is typed on the keyboard. The program will then send the 

typed chorocter until another character is typed or the test is 

terminated by typing a “rubout". The characters are transmitted at 

the maximum rate with a carriage return-line feed inserted after every 
132/10) printable characters. 


If the LA36 is in half duplex when running this test. characters may 
be fost or garbled whenever ao character is typed on the keyboard 


With the Auto Line Feed Option set to produce an automatic line feed 
after every carriage return, there will be a blank tine between euch 
printea iine. 


6.2.3 Test 22 - Line Echo Test. Slow Rate 


This test is identical tc Test 21 except a delov of 1.8 seconds ‘5 
inserted between each character to allow the print head to perform ar 
LCV between characters. 


SEQ 0021 


J 2 
Page 22 


6.2.4 Test 23 - Choracter/Code Echo Test 


This test will print the octal code received by the processor followed 
by the choracter or the mnemonic of the character every time a key is 
pressed on the keyboard. The parity of the received code will be 
indicated as either odd or even. Allow sufficient time between 
characters for the line to be printed 


With the Auto Line Feed Option set to produce aon automatic iine feed 
after every received carriage return, .there will be a blank line 
between each printed line. 


Cc .AMPLE- 
701 a [e) 8) 8) 
ys Se | 00D 
215 SOR EVEN 
4G) SP EVEN 


6.2.5 Test 24 - Selected Pattern Echo Test 

This test is desianed to give maintenance the flexibility to choose 
their own patterns for isolating any specific problems which may arise 
in the field. 


Type any characters (except control-¢€ and rubout) and each character 


will be echoed as typed. A moximum of 256(10) characters may be 
inputted. No corriage returns or iine feeds are inserted by the 
program, all! chorocters must be inputted by the operator To 
terminate the input string type a control-C, the program will then 
continually echo the inputted pettern. To stop the printing, type 
control-C. The program will stop printing the pattern and will wait 


for either another pattern input terminated by a control-C. or the 
same pattern moy be used again by typing control-C. To exit the test 
et any time. type a “rubout”. 


When any options are available, he careful what choracters or 
choracter sequences ore selected. 


6.2.6 Test 25 - Be!! Echo Test 


This test is designed to test the bell on column 64 if typing has 
occured on the line. The test prints a message: 


TYPE ANY PRINTABLE CHARACTER AND LISTEN FOR BELL ........... 


After the test messoge is printed, type cny printable character on the 
keyboord. The choracter wil! be echoed and the bell should ring. The 
message will then be typed again. Type the “rubout™ key to terminate 
the test at any time 


SEQ 0022 
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6.4 STANDARD !-0 TESTS 


These tests are designed os o brief check of the console terminal 
interface logic. Each check is structured as an independent test and 
the switch register controls may be used. A description of each test 
is given in the program listing. Any errors encountered during the 
170 cests will couse a halt at location "ERRHLT” if switch 14 is down 

NLIST 

EWDP 


11ST 


~te 


SEQ 0023 
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MAINDEC-11-DZLAC-D MACY11 3001046) 16-NOV-77 16:02 SEQ 0001 
ZLACD. P11 16-NOV-77 15:57 TABLE OF CONTENTS SEQ 0024 
15 01400 SWITCH REGISTER OPTIONS 
4i 04000 SPECIAL OPERTIONAL INFORMATION 
63 06100 SYSTEM EQUATES 
131 13000 TRAP CATCHER & STARTING ADDRESSES 
186 18500 SYMBOL DEFINITIONS 
235 00100 PROGRAM INITIALIZATION & CONTROL 
697 46300 COMMON ROUTINES USED BY LA36 TESTS 
1222 00100 . 170 LOGIC TESTS 
1786 00100 LA36 PRINTER TESTS 
2397 00100 LA36 ECHO TESTS 
-e92 00100 MISC. DIAGNOSTIC MESSAGES 


M 2 
MAINDEC-11-DZ2LAC-D MACY11 30(1046) 16-NOV-77 16:02 PAGE 1 SEQ 0002 


DZLACD. P11 16-NOV-77 15: 57 SEQ 0025 

4 00400 . TITLE MAINDEC-11-DZLAC-D0 

5 ooso00-_~—C; 

6 00600 ;LA36 DIAGNOSTIC (OL11 & KL11 INTERFACE) 

7? 00700 :=«(; 

8 o0o0so0.s—C 

9 00900 ; AUTHOR: ROBERT W. BAKER 

10 ‘00950 =; RALPH A. SCHAUBER 

+ aes ; COPYRIGHT 1974,1977 DIGITAL EQUIPMENT CORP... MAYNARD, MASS. 01754 
2 1 

13 4 01200 

14 ‘ 01300 

15 4 01400 _SBTTL SWITCH REGISTER OPTIONS 

le 01500 =; 

i7 ‘ a See ; SWITCH POSITION FUNCTION 

12 4 ; 

19 01800 ; 15 UP (1) HALT AT COMPLETION OF CURRENT TEST 
z0 oe thee, ; DOWN (0) CONTINUE NORMAL TEST SEQUENCE 

ol et j 
Ze 02100 s Ww i) CONTINUE ON ERROR 

23 02200 ; HALT ON ERROR 

24 . 02300 ; 
25 ; 02400 ; 13 UP (1) DRIVE ONLY CONSOLE TERMINAL 

26 02500 =O; DOWN (0) DRIVE ALL TERMINALS 

27 02600 3 
2 02700 ; UP (1) LOOP ON INDIVIDUAL TEST 

29 02800 ; DOWN (0) NORMAL TEST SEQUENCE 

30 02900: =O; 
31 ; 03000 :; 09 UP (1) CPU TYPE IS AN LSI-11. 11703 

32 03100 ; DOWN (0) ALL OTHER 11 CPU'S 

33 02200 ; 
3u 03300 ; as UP (1) HALT TO SELECT TEST AT END OF CURRENT TEST 
35 03400 ; DOWN (0) LOOP ON TEST SEQUENCE 

36 03500 : 
37 03600 ; 05-00 TEST # SELECTION 

3E 03700 ; 


5 03800 ~=::«O7-00 # OF COLUMNS AT START-UP 
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DZLACD, P11 16-NOV-77 15: 57 SPECIAL OPERTIONAL INFORMATION SEQ 002 
“| i Se Apps .SBTTL SPECIAL OPERTIONAL INFORMATION 
43 ; ; t 04200 i -- THE STANDARD CONSOLE TERMINAL INTERRUPT VECTOR AND REGISTER 
4Yy uy < 04300 =; ADDRESSES ARE USED. TO REDEFINE THE LOCATION OF THE CONSOLE 
4S . O4400 SC; TERMINAL THE SYMBOLIC LOCATIONS “CONADD” AND “CONVEC™ SHOULD 
m . Abe ; BE CHANGED BEFORE START UP. 
WB 04700 i2-- BEFORE START UP REFER TO THE DESCRIPTION OF THE ROUTINE “OLY” 
49 04800. CO; TIMING 1S A FUNCTION OF THE POP11 MODEL AND MEMOPY TYPE AND 
1 aan ; SHOULD BE SET UP BEFORE RUNNING THE DIAGNOSTIC. 
1 ‘ , 
s 05100 ;3.-- 1F CPU IS AN 11703 . LSi-11 SET SWITCH REGISTER 
53 . =o. ; BIT 09 TO A 1. SPECIAL TESTS ARE RUN ON THE DLV1i. 
54 . ; 
cs OS400 =;4-- SYSTEMS WITHOUT A HARDWARE SWITCH REGISTER SHOULD SE 
Br ae ; MEMORY LOCATION 176 AS A SOFTWARE SWITCH REGISTER 
7 ; 
ss . 06700 ;5-- THIS DIAGNOSTIC 1S FOR VERIFICATION OF BASIC TERMINAL 
59 05800 ; FUNCTIONS ONLY. IF THE TERMINAL UNDER TEST HAS HARDWARE 
60 05900 :~—C: OPTIONS INSTALLED RUN DIAGNOSTIC MDEC-11-O2Z2LAF-A, THE 
61 06000 ; L436 TERMINAL OPTIONS TEST. 
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DZLACD. P11 16-NOV-77 15: 57 SYSTEM EQUATES SEQ 0027 
63 | 06100 .SBTTL SYSTEM EQUATES 
- 64 06200 =C: 
6s 06300 =; 
6b 06400 =; REGISTER EQUATES 
67 06500 =; u 
68 000000 06600 RO=%0 
69 000001 06700 R1i=%1 
70 000002 06800 R2=%2 
71 000002 06900 R3=%3 
72 000004 07000 R4=%4 
73 000005 07100 R5=%5 
74 000006 07200 SP=%6 
7S gms 000007 07300 PC=%7 
vo 177776 07400 PSW=177776 
7? 07500: =; 
7s 07600 =O; SYSTEM EQUATES 
79 07700 ; 
so 000001 07800 BiTO=1 
£1 000002 07900 BIT1=2 
82 ooo0o04 08000 BiT2=4 
83 c00010 08100 B1T3=10 
gy 000902 08200 61T4=20 
ss 000040 08300 BITS=40 
86 000100 08400 BiTé=100 
7 000200 08500 B177=200 
§§ 000400 08600 81T8=400 
89 001000 08700 81 T9=1000 
90 002000 08800 B1T10=2000 
91 004000 08900 B1T11=4000 
92 0160000 09000 B1T12=10000 
93 020000 09100 B1T13=20000 
ay 040000 09200 B'1T14=40000 
ac 100000 09300 B1T15=100000 
96 000000 09400 OPEN=0 
? 040000 09500 SCOPSW=B1IT14 > SCOPE SWITCH 
9g 004000 09600 NITRSW=B1T11 ; TEST LOOP SWITCH 
99 00572 09700 POPSP=5726 >POP STACK ONCE 
100 22626 09800 POPSP2=22626 ;POP STACK TWICE 
101 000340 09900 PRTY7=340 /PRIORITY LEVEL DEFINITIONS 
102 000200 10000 PRTY4=200 
103 000200 10100 ACRLF=200 
104 001000 10200 LS'11=BITS >FLAG FOR LSI-11-11/03 
106 10300 =; 
106 10400 ; PROGRAM TRAP EQUATES 
107 10500 
108 104000 10600 TYPE=EMT+O 
109 104001 10700 ERROR=ENT+1 
110 104002 10800 EHAL T=ENT+2 
111 104003 10900 STRORV=ENT+3 
112 104004 11000 STPCHV=ENT+4 
113 104005 11100 CHAIN=ENT+S 
114 104006 11200 CHAL T=ENT+6 
115 104007 11300 TYPEM=ENT+7 
116 104910 11400 DELAY=EMT+10 
117 104011 11560 TTYCTL=ENT#+11 
118 


104012 11600 CRLF=EMT#12 
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SEQ 0005 
DILACD. P11 16-NOV-77 15: 57 SYSTEM EQUATES SEQ 0028 

1193 104013 11700 SCRLFZENT+13 

120 104014 11800 LFSENT+14 

121 104015 11900 PRINTC=ENT+15 

122 104016 12000 PRTHOR=ENT+16 

123 104017 12100 PRNT=ENT#+17 

124 104020 12200 READ=ENT+20 

125 104021 12300 AREAD=ENT+21 

126 104022 12400 CR=ENT+22 

12? 104023 12500 BTOASC=ENT+23 

128 104024 12600 FORWO=ENT+24 


104025 12700 READC=ENT+25 











































OWS uits 


WLILIILts 


137 


ak Be 11-DZ2LAC-D 
DZLACD. P11 


000000 
000002 
000004 
000006 
000010 
000012 
000014 
000016 
000020 
000022 
000024 
00002¢ 
000030 
000032 


000042 


000046 


000052 


000174 
000176 


000200 
000204 
000210 
000214 


000600 
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000000 


oco002 
000000 
000006 
000000 
000012 
00c000 
000016 
000000 
000022 
000000 
000026 
000000 
002722 
000340 


000042 
000000 
ooco4e 
011522 
000052 
010000 
000174 


000000 
600000 


000137 
000137 
000137 
000137 
000600 


000000 


001010 
000736 
000754 
000772 


16-NOV-77 


a 
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TRAP CATCHER & STARTING ADDRESSES 
.SBTTL TRAP CATCHER & STARTING ADDRESSES 


13000 
13100 
13200 
13300 
13400 
13500 
13600 
13700 
13800 
13900 
14000 
14100 
14200 
14300 
14400 
14500 
14600 
14700 
14800 
14900 
15000 
15700 
15800 
15900 
16000 
16100 
16200 
16300 
16400 
16500 
16600 
16700 
16800 
16900 
17000 
17100 
17200 
17300 
17400 
17500 
17600 
17700 
17800 
17900 
18000 
18100 
18200 
18300 


MACHER: 


DISPREG: 


SWREG: 


SPBOT: 


.ENABL ABS, AMA 


_ WORD 
. WORD 


JMP START 

JMP STARTI 
JMP START2 
JMP STARTS 


0 
0 


; UNASSIGNED TRAP 

;SP OVERFLOW, BUS ERROR TRAP 
RESERVED INSTRUCTION TRAP 

+ TRACE TRAP 

; TRAP TO CALL 10X 

;POWER FAIL TRAP 

EMT TRAP 


> SOFTWARE DISPLAY 
> SOFTWARE SWITCH REGISTER 


>START UP WITH 170 TEST RUNNING 
>START UP. SKIP ALL 170 TEST 

> START UP TERMINAL CONTROL WITH 
>START UP TERM CNTL WITHOUT 170 


>BOTTOM OF STAC 


SEQ 0006 
SEQ 0029 


170 TEST 
TESTS 


: 
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DZLACD. P11 16-NOV-77 15:57 SYMBOL DEFINITIONS SEQ 0030 | 


186 18500 .SBTTL SYMBOL DEFINITIONS 

18? 18600 =; 

18$ 18700 =; 

189 18800; 

190 000602 177560 18900 CONADD: 177560 ADDR OF CONSOLE RECEIVER STATUS REG 
191 000604 000060 19000 CONVEC: 60 ;CONSOLE TERMINAL INTERRUPT VECTOR 
192 000606 176500 19100 ODLAOR: 176500 ADDRESS OF FIRST DLi1, DEFAULT TO DL11-A.B 
193 19200 + IF OL11-C.D0,E., THEN 

194 19300 ;SET TO 175610 FOR FIRST 16 (OF 31) OR 
195 19400 +SET TO 176000 FOR LAST 16 (OF 31) 
196 19500 OR SET OTHER DESIRED START ADDRESS 
197 000610 000020 19600 ODLNR: 16. +# OF DL11'S TO BE INITIALLY ASSUMED 
198 000612 177560 19700 ~=wTKS: 177560 ; CONSOLE RECEIVER STATUS REG 

199 000614 177562 19800 TKB: 177562 CONSOLE RECEIVER BUFFER 

200 000616 177564 19900 ~—sWdTPS:: 177564 ; CONSOLE TRANSMITTER STATUS REG 

201 000620 177566 20000 =s‘ TPB: 177566 ; CONSOLE TRANSMITTER BUFFER 

202 000622 000060 20100 TKVTR: 60 +C. T. RECEIVER INTERRUPT VECTOR 

203 000624 9000200 20200 TKLVL: PRTY4 7C. T. RECEIVER PRIORITY LEVEL 

204 000626 9000064 20300 <TPVTR: 64 :C. T. TRANSMITTER INTERRUPT VECTOR 
205 000630 000200 20400 TPLVL: PRTY4 +C. 7. TRANSMITTER PRIORITY LEVEL 

206 000632 000000 20500 FSTOL: OFEN ; ADDRESS OF FIRST ACTIVE DL11 

207 000634 000000 20600 CNTLSW: OPEN ; CONSOLE TERMINAL CONTROL SWITCH 

208 000636 000000 20700 RTNNO: OPEN CONTAINS CURRENT TEST NUMBER 

209 000640 00000 20800 NXTST: OPEN CONTAINS ADDRESS OF NEXT TEST 

210 000642 9000000 20900 SCOPTR: OPEN CONTAINS ADORESS OF TEST SCOPE ENTRY 
211 000644 9000000 21000 PRGID: OPEN ; CONTAINS TEST PROGRAM INDICATORS 
212 000646 000000 21100 CRBUF: OPEN 

213 000650 9000000 21200 =CTRA: OPEN 

214 000652 000000 21300 WIDTH: OPEN >CURRENT PAPER WIDTH. BINARY 

215 000654 000000 21400 LEVEL: CPEN *>LEVEL OF EXECUTION 

216 Qo0656 9000000 21500 ODLCNT: OPEN 7# OF MULTIPLE OL11S 

217 000660 000000 21600 =I CTR: OPEN 1/0 TEST 1 TERATION COUNT 

218 000662 000000 21700 = REPT: OPEN : TEMP STORAGE FOR TESTS E021 & E022 

219 000664 000000 21800 BRCTR: OPEN COUNTER FOR ROUTINE “AREAD™ 

220 000666 000000 21900 COUNT3: OPEN COUNTER FOR ROUTINE “PRINTC" 

221 000670 000000 22000 = XCSR: OPEN ;ADORESS OF MULTIPLE DL11 STATUS 
222 000672 000251 22100 TIMER: 251 +1 MSEC COUNTER FOR ROUTINE “DELAY™ 
23 000674 9000000 22200 SPCNT: OPEN COUNTER FOR TEST ROUTINE “PT3” 

224 000676 000000 22300 CURTST: OPEN »-ADDRESS OF CURRENT TEST 

225 000700 000000 22400 TEMPCH: OPEN ; TEMP STOR FOR ECHO TESTS 

226 000702 9000000 22500 PARITY: OPEN /PARITY FLAG FOR RECEIVED CHAR 

227 000704 9000000 22600 PCHAR: OPEN >CHAR CODE WITH PARITY BIT 

228 000706 000090 22700 LFCNT: OPEN /COUNTER FOR TEST ROUTINE “PT4" 

229 000710 900000 22300 INCHK: OPEN / CHECK FOR INPUT FLAG 

230 000712 9000000 22900 ~=—s TEMP: OPEN TEMPORARY WORKING STORAGE 

231 000714 177570 23000 = SP: 177570 >SW REG ADDRESS 

232 000716 900000 23100 8=CNTR: OPEN TIME COUNTER FOR LSI11 TESTS 


ee a SD 


+ - 7 
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zis 










































000720 


MAINDEC-11-DZ2LAC-D 
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005737 
001403 
011600 
005740 
oo0co00 
000002 
012737 
012737 
000424 
012737 
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000654 


177777 
104006 


104011 
005330 


104011 
177777 


005330 
104006 
000600 
000006 
000004 
001054 
177642 


000176 


000202 
000004 
000006 
000710 
000006 
000644 
000634 
000654 
002450 
003700 


005300 
001700 


001700 
905300 


001700 
005300 


005300 
001700 


900004 


000714 


000672 


000004 


000024 


PROGRAM INITIALIZATION & CONTROL 


+ COMMON HALT---WHEN IN SWITCH REGISTER CONTROL THE CPU 
WILL BE ADVANCED TO THIS COMMON HALT WHERE 
A NEW TEST WILL BE EXPECTED TO BE STARTED 


LEVEL 
SELHLT 
asP. RO 
-(RO) 


#177777, ATOX 
SCHALT. WAI TF 
STARTX 
@TTYCTL. WAITF 
#AT1,ATOX 
STARTX 
#TTYCTL, WAI TF 
#177777, ATOX 
STARTX 

#AT1. ATOX 
#CHALT. WAI TF 
#SPBOT, SP 

6. -«SP) 


11 
SSWREG. SR 
(SP i+. (SP 4 


#202. TIMER 
(SFi¢.4 
(SP i+. 6 
INCHK 

#6. MACHERP 
PRGID 
CNTLSW 
LEVEL 
ePFRIL. 24 


16-NOV-77 16:02 PAGE 2 
PROGRAM INITIALIZATION & CONTROL 
00100 =) are 

200 
00300 =; exeaaKEE 
00400 
oosoo0.=—C«Cz 
00600 =O: 
00700 +; *keaEEEE 
00800 
00900 = CHLT: TST 
01000 BEQ 
01100 Mov 
01200 TST 
01300 HALT 
01400 SELHLT: RTI 
01500 STARTI: MOV 
01600 MoV 
01700 BR 
01890 STARTZ MOV 
91900 MOU 
02000 BR 
02100 START3. mov 
02200 MoV 
02300 ee 
02400 START. MOY 
02500 MOV 
02600 STAPTX MOV 
02700 MoV 

2800 MoV 
02906 MoV 
03000 TST 
03100 BR 
03200 108 MoV 
03300 cMP 
03400 TYPE 
03500 NOSWP 
03600 Moy 
03700 11% MoV 
03800 MoV 
03900 CLP 
04900 MOV 
04100 CLP 
04200 CLP 
04300 CLP 
34400 MO 
04600 JSP 


PC. CONIT 


> TEST CURRENT LEVEL 
BRANCH IF 0, DO NOT HALT 
PUT ADDRESS OF CALLER INTO RO 


RETURN FROM INTERRUPT 
FORCE END OF 1/0 TESTS 
FORCE SR CONTROL 


FORCE TERMINAL CONTROL 
/FORCE ALL 1/0 TESTS 


FORCE TERMINAL CONTROL 
FORCE END OF 1/0 TESTS 


/FORCE ALL 170/TESTS 
FORCE SR CONTROL 
SET STACK POINTER 
SAVE CURRENT VECTOR 


/SET UP TIMEOUT VECTOR 

> TRY TO REFERENCE HARDWARE SW REG 
/BRANCH IF NO TIMEOUT TRAP OCCURS 
“POINT TO SOFTWARE SWITCH REGISTER 
/RESTORE STACK 

/ TELL OPERATOR TO USE SOF TWARE 

/ SWITCH REG AT LOC 176 

;ADJUST TIMER FOR LSI-11 

/RESTORE TIMEOUT VECTOR 


-ALLOW INPUT CHECKING 

> CLEAN UP 

_INTTIALIZE PROGRAM FLAGS 

- INITIALIZE TERMINAL CONTROL SWITCH 
- INITIALIZE LEVEL 

SET ADDP POWER FAIL ROUTINE 

SET UP CONSOLE TERMINAL ACOPESS 


0009 


SEQ 
SEQ 0032 


MAINDEC-11-DZ2LAC-D 


OCLACO 


Pi 


| 


001146 
001152 
001156 
001162 
001164 
001170 


16-NOV-77 


017701 
042701 
020127 
002003 

20127 
101002 
012701 
010137 
012700 
012762 
104023 
000401 
000410 
012700 
104015 
104007 
013676 
012737 
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177542 
177400 
000204 


000035 
000204 
000052 


Ow41i2 
000093 


noocen 
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04700 
04800 
04900 
05000 
05100 
05200 
05300 
05400 
05500 
05600 
05700 
05800 
05900 
06060 


> MXEKEAEEEE 

+READ THE PAPER WIDTH. NUMBER OF COLUMNS, 

FROM SWITCH REGISTER POSITIONS 0-7. SAVE AND 

CONVERT TO 3 ASCII CHARACTERS. A WIDTH GT122 

-OR LT3O0 COLUMNS (DECIMAL) WILL BE ABORTED TO 132. 

+ THE SWITCHES MAY BE CHANGED ONCE THE PROGRAM TITLE OR THE OL11 COUNT 
MESSAGE HAS STARTED TO PRINT. 

; MXKEKKEEEE 


MOV asr, Ri ;PUT (SR) INTO R1 
BIC #177400, R1 ;SAVE ONLY BITS 0-7 
CMP R1,#204 + TEST NO. COLUMN GT132 
BGT 23 ;COLUMNS GT132. DEFAULT TO 132 
1$: CMP R1, #35 ;CHECK IF NO. COLUMNS LT 20 
BHI 3$ ;NOT LT 30 NOR GT 132 
28 MOV #204,P1 ; COLUMNS LT 30 OR GT 132. DEFAULT 
3$ MoV R1,WIOTH ;SAVE NO. COLUMNS IN WIOTH 
MOV #HDRO, PO ;ADOR TO STORE ASC11 COLUFIN VALUE 
MOV #3-R2 >D0 AR 3 CHAR. CONVERSION 
BTCASC > CONVERT NO. COLUMNS TO ASCII 
4S Br. s$ 
BR 6$ 
5$ Mow #0.R9 - TRANSMIT A 
PRINTC >NUL CODE 
TYFEM - TYPE PROGRAM TITLE FIPST TIME PUN 
STARTM 
MO BNOP, US 





SEQ 0010 
SEQ 0033 

































DILACH. P11 


Cl el el ee el el ell 
OME tstsr—-Ow 


LS tabs tstiainta 


001240 
317 001246 
218 001252 
2719 001256 
320 001262 
321 001264 
222 001272 
325 4001276 
324 001300 
225 001302 


239 001352 
340 001354 


34 O0135e 
349 6001362 
350 001366 
361 00137 

352 001376 
353 001404 
354 001406 
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012737 
013700 
013701 
005037 
005710 
012737 
010037 
000401 
005710 
062700 
005237 
005301 
001407 
000770 
005301 
001404 
062700 
000754 
022626 
013701 
012700 
012702 
1040223 
10460" 
014034 


005037 


15: 


001320 
000606 
000610 
Cl0e6S6 


001332 
000632 


000010 
000656 


000010 


000656 
014947 
oc0co2 


0006 36 
000654 
005300 


N0S276 


17? 2 


on) 
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000004 


000004 


177777 


000640 
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> REKEEAEEE 


+ THIS NEXT PART CHECKS THE PRESENCE OF DL11-A OR DL11-C 


+ STARTING AT 776500. 


A MESSAGE WILL BE PRINTED INDICATING THE NUMBER 


;PRESENT. THE PRINTER DIAGNOSTIC WILL ADDRESS EACH OF 
>THE MULTIPLE OL11S IN THE SYSTEM IF SWITCH 13 IS DOWN (0) 


> AXHKKEKEEK 
6S: MoV 


ENDZA: DEC 


END2: POPSP2 
ENC: MOV 


eo 2 3 t 2 8 8 8 8 | 


#END2A, MACHER 
DLADR, RO 
DLNR, Ri 

DLCNT 

(RO) 

#END2, MACHER 
RO. FSTCL 


DLCNT. Pi 
#OL11S1.P0 
#2,P72 


> INITIALIZE TIME OUT TRAP 

; ADDRESS OF FIRST OL11 TO RO 
;SET DL CHECK COUNT 

>; INITIALIZE OLCNT 

+ 1S OL PRESENT? 

+ YES, RESET TIME OUT TRAP 
;STORE ADDRESS OF FIRST DL11 
+ CONTINUE 

+ 1S OL11 PRESENT 

;POINTER AND DL11 ADDRESS 

> INCREMENT COUNT OF DOL11'S 
;DECREMENT DL CHECK COUNT. DONE? 
>BRANCH IF DONE 

>CHECK PRESENCE OF NEXT DL11 
>DONE DL CHECK? 

>NO, CHECK NEXT OL 

> CONT INUE 

>DOL11 NOT PRESENT 

/GET # OL11°S 

/ AOR OF ASCII CHAR STORAGE 
># OF ASCII CHARS 

> CONVERT NUMBER 

> TYPE MESSAGE 


EXECUTE THE STRING OF CONSOLE TERMINAL 1.0 TESTS 
>: THEN EITHER HALT AT LOCATION SELHLT OR CONTINUE WITH 
/PRINTER TESTS AS A FUNCTION OF SR BIT &. 


2232599 23) 


Mow 
FOPWD 
Jme 


#ATO.NXTST 
aCURPTST 


> SET ROUTINE NO = 0 
/SET LEVEL = 0 
-SEE IF 1/0 1S TO BE SKIPPED 


“ACORESS OF FIRST 170 TEST 
-SET UP TEST PARAMETERS 
:G0 TO 1.0 TEST ROUTINE 


SEQ 0011 


SEQ 0034 


| 
| 
| 
| 
| 
| 
| 
| 
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001412 
001420 


001550 
001552 
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032737 
001401 
104011 
005737 
100016 
032777 
001407 
022737 
001403 
017716 
000002 
042737 
005737 
001405 
032777 
001405 
000092 
005337 
001407 
000002 
032777 
001402 
000137 
022626 
000240 
005777 
100003 
113700 
000000 
005737 


000001 


000644 
040000 
17777? 
177164 


100000 
000654 


004000 


000660 


600400 
001700 


177152 
000636 
000654 


N00634 


177254 
000642 


600644 


177212 


16-NOV-77 
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12200 
12300 
12400 
12500 
12600 
12700 
12800 
12900 
13000 
13100 
13200 
13300 
13400 
13500 
13600 
13700 
13800 
13900 
14000 
14100 
14200 
14300 
14400 
14500 
14600 
14700 
14800 
14900 
15000 
15100 
15200 
15300 
15400 
15500 
15600 
15700 
15800 
15900 
16000 
16100 
16200 
16300 
16400 
16500 
16600 
16700 
16800 
16900 


Pe SS oo 0 8 3 8 3 | 
; CHAI NN-- 


ee ee ee ee ee ee ee ee | 


Bs We Be 


STTTT ttt TT 
CHAINN: BIT 
BE 


1$: TST 


2s: BIC 
34: TST 


4: DEC 


5S: B\T 


65: 
CHAINY: 


THIS PORTION 1S THE COMMON RETURN 
FOR ALL THREE CLASSES OF TESTS 


1--1F AN ERROR OCCURED DURING AN !/70 TEST THE 
OPERATOR CAN CAUSE THAT TEST TO BE LOOPED 
WITHOUT ANY FURTHER ERROR HALTS BY 
SETTING THE "SCOPE" BIT (#14) ON THE SR=1. 
RESETTING SR BIT 14 TO O WILL ALLOW THE 
ERROR HALT TO OCCUR AGAIN IF IT STILL EXISTS 


2--\F THE OPERATOR IS IN THE MAINTENANCE 
MODE (BIT 8 SET = 1 AT START UP TIME), 
SELECTED PROGRAM WILL LOOP CONTINUOUSLY 

; 1F SR BIT 11 IS SET=1. 

; THEN THE PROGRAM WILL BE ADVANCED TO 

THE NEXT TEST IN IT'S CLASS IF BIT 8=0 

; AS LONG AS BIT 11 AND 

; BIT 8 ARE O, 


#1, CNTLSW 
1$ 


PRGID 

3$ 
#SCOPSHW, dSR 
2$ 

#-1, SCOPTR 
2$ 
SCOP TR, aSP 


#BIT15,.PRGID 
LEVEL 


4g 
#NITRSH. aSR 
55 

ICTR 

6$ 

#B ITS, aSR 
6$ 

WAITF 

asr 

15 
RTNNO, RO 
LEVEL 


THE CLASS OF TESTS SELECTED 
WILL BE CONTINUOUSLY SEQUENCED THROUGH. 
\F BIT 11 1S O AND BIT 8=1, 
WILL HALT AT LOCATION SELHLT AND WAIT FOR THE 
NEXT TEST NUMBER TO BE SET IN THE 

SWITCH REGISTER 


SEQ 0012 


SEQ 0035 


THE 
iF BIT 11 IS = O 


THEN THE CPU 


>CKECK IF TERMINAL CONTROL 
BRANCH IF NOT 

*GO TO TERMINAL CONTROL 

+ TEST ERROR BIT IN PRGID 
+BRANCH IF ERROR BIT NOT SET 
7ERR, CHECK IF SCOPE OPTION ON 
*BRANCH |F NO SCOPING 

> YES, CHECK IF OK TO SCOPE THIS TEST 
BRANCH IF NOT OK 

;PUT ADDR OF SCOPE ENTRY INTO STACK 
*GO TO SCOPE ENTRY IN TEST 
>CLEAR ERROR IND. IN PRGID 
CHECK LEVEL 

*BRANCH IF LEVEL=0 

> TEST LOOP SWITCH ON (=1) 
BRANCH IF NO LOOP TEST 

GO BACK TO TEST 

;DECREMENT TEST ITERATION COUNT 
BRANCH IF COUNT=0 

NOT ZERO, REPEAT TEST 

TEST IF SEQUENCE TEST (BITS) 
>BRANCH TO NEXT TEST IF BIT8=0 
>GO WAIT FOR MORE INPUT 

:POP 2 OFF STACK 

> THIS FORMERLY WAS RESET 

CHECK SR 

>BRANCH IF NO HALT WANTED 
CURRENT TEST NUMBER TO RO 
>HALT (NOT FOR TEST SELECTION) 
> TEST THE CURRENT LEVEL 


—_ 
| 
| 
| 


ie 


K 3 
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OZLACD. P11 16-NOV-77 15: 57 PROGRAM INITIALIZATION & CONTROL SEQ 0036 
412 001556 001420 17800 BEQ 3$ ;BRANCH IF O 
413 001560 012737 O00006 O00004 17900 MoV #6, MACHER + CLEAN UP 
414 001566 012706 000600 18000 MOV #SPBOT. SP ;SET UP STACK POINTER 
415 001572 104024 18100 FORWD ;SET UP VALUES FOR NEXT TEST 
416 001574 022737 177777 O00640 18200 CMP #-1,NXTST 7END OF 170 TESTS (=-1) 
417 001602 001004 18300 BNE 23 ; BRANCH IF NOT END 
418 001604 012737 005276 O00640 18400 MOV #ATO. NXTST ;RESET NXTST TO FIRST 170 TEST 
419 001612 104024 18500 FORWD ;SET UP VALUES FOR NEXT TEST 
420 001614 000177 177056 18600 23: JMP OCURTST ;GO TO TEST 
421 001620 022737 177777 O00640 18700 3%: CMP #-1,NXTST [END OF 1/70 TESTS (2-1) 
422 001626 001012 18800 BNE NEXT ;BRANCH IF NOT 
423 001630 032777 OO0400 177056 18900 SKIP: BIT #BiT8, aSR ; TEST IF WANT TEST SELECTION RIGHT AWAY 
424 001636 001016 19000 BNE NEXT1 ;BRANCH IF NOT 
425 001640 052737 000200 000644 191060 BIS #81T7,PRGID ;BYPASS SCOPING 
426 001646 012737 007402 O00640 19200 Mov #PTO, NXTST ;PROD TESTING, GO TO PRINTER TESTS 
427 001654 012737 000006 000004 19300 NEXT: MOV #6, MACHER ; CLEAN UP 
428 001662 012706 000600 19400 MoV #SPBOT. SP ;SET UP STACK POINTER 
429 001666 104024 19500 FORWD ;SET UP NEXT TEST PARAMETERS 
430 OCle7C 000177 177C02 19600 JMP aCURTST ;GO TO ROUTINE 
431 001674 0905237 oO00654 19700 NEXT1: INC LEVEL 
432 19800 
433 19900); Ax KKK 
434 20000 =; WAIT FOR FURTHER INSTRUCT! ONS: 
435 20100 -LOAD PROGRAM NUMBER INTO BITS O-5 OF THE SR 
436 20200 =: -SET SR BIT 11=1 TO LOOP ON SELECTED TEST 
4 37 20300 _—=S; -SET SR BIT 11=0 AND BIT 8=0 TO LOOP THROUGH 
438 20400-—C; SEQUENCE OF SELECTED TESTS 
439 20500_—Cés: -SET SR BIT 11=0 AND BIT 8=1 TO HALT AGAIN AFTER 
440 20600 EXECUTING TEST ONCE 
441 20700  peaexneees 
442 20800 
443 001700 104006 20900 WAITF: CHALT ;OR TTYCTL IF START WAS AT 206 
444 001702 012737 O00COe 00004 21000 MoV #6. MACHER :CLEAN UP 
44S 001710 012706 000600 21100 MOV #SPBOT. SP ;SET UP STACK POINTER 
446 001714 017700 176774 21200 MoV ase, RO ;GET CURRENT SW REG 
44? 001720 042700 177700 21300 BIC #177700, RO 
448 001724 020027 000037 21400 CMP RO, #37 ; TEST IF PROG NO. Is 170 TEST 
449 001730 101403 21500 BLOS 1$ ;BRANCH IF EQ OR LT 37. AN ECHO OR PRINTER 
450 001732 005037 000644 21600 CLR PRGID , 120 TEST, CLEAR PRGID 
451 001736 000403 21700 BR 2g 
452 001740 052737 000200 200644 21800 15%: BIS #B1T7.PRGID ;BYPASS SCOPING 
453 001746 000241 21900 = 28: CLC ;CLEAR C BIT 
454 001750 006190 22000 ROL RO ;GET PROGRAM ADDRESS OUT OF 
455 001752 016037 002522 000640 22100 MoV PRGTAB(RO),NXTST; PROGRAM ADDRESS TABLE 
4uS6 001760 023727 000640 001700 22200 CMP NXTST, #WAI TF: ; TEST IF LEGAL TEST NO 
4S7 001766 001744 22300 BEQ WAI TF :BRANCH IF ILLEGAL 
458 001770 104024 22400 F ORWD :SET UP TEST PARAMETERS 


459 001772 O00177 176700 22500 Jne ~ @CURTST :GO TO TEST 


MAINDEC-11-DZ2LAC-D 
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461 
462 
463 


001776 
002000 
002004 
002006 
002012 
00201€ 


002204 
002210 
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022626 
105777 


100013. 


017705 
042705 
020527 
001004 
042737 
000413 
032737 
001401 
000002 
032737 
001402 
000137 
012737 
012700 
104010 
104007 
014324 
005037 
104020 
023727 
001773 
012700 
104010 
104017 
117777 
004737 
000541 
010005 
006305 
006305 
006305 
104020 
023727 
001773 
012700 
104010 
104017 
117777 
004737 
000516 
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176606 
176602 
177600 
000177 
004400 


004000 


000400 
001534 


177777 
000036 


000710 
000700 
000036 


176460 
002460 


000700 
000036 


176412 
002460 


000634 
000634 


000634 


900716 


000040 


176462 


000040 


176414 


By a 77 
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+ KXKKKEEEEE 


;TTYi-- THIS SECTION IS USED WHEN THE DIAGNOSTIC |S BEING CONTROLLED BY 
IT 1S EFFECTIVE ONLY WHEN THE DIAGNOSTIC 
STARTING ADDRESS IS 210 AND SR BIT @ WAS SET AT START TIME. 

THE RESPONSE TO THE MESSAGE “SELECT TEST NO." MUST BE THE 2 
DIGIT OCTAL TEST NUMBER FOLLOWED BY ; 


; 
, 
‘’ 
, 
; 
, 
’ 
’ 
, 


Pe 2 2 2 2 2D 9 8 @ | 


TTY1: +h 


THE CONSOLE TERMINAL. 


"L" TO LOOP ON TEST 
"S$" TO LOOP ON SEQUENCE 
"." TQ EXECUTE TEST ONCE 


dTKS 
1$ 


OTKB, RS 
#177600, R5 
R5, #177 

1% 


#4400, CNTLSW 
TTY1B 

#NITRSW. CNTLSW 
2$ 


#B1T8, CNTLSW 
TTY1B 


CHAINY 
#-1, INCHK 
#30. -RO 


INCHK 
TEMPCH, #40 
1$ 

#30. .R0 


aTKB. aTPB 
PC, TESTC 


TEMPCH, #40 
2$ 
#30. RO 


OTKB. dg TPB 
PC. TESTC 
8$ 


ABOVE MESSAGE 


;POP 2 FROM STACK 
+ TEST IF ANY INPUT 
BRANCH IF NOT 
GET CHAR 

MASK BITS 

>CHECK IF RUBOUT 
BRANCH IF NOT 

> CLEAR LOOP BITS 


;+CHECK IF LOOP ON TEST 

BRANCH IF NO LOOP ON TEST 
+LOOP ON TEST 

; TEST IF LOOP ON SEQUENCE 
BRANCH IF NO LOOP ON SEQUENCE 
;CHAIN TO NEXT TEST 

STOP INPUT CHECKING 

DELAY FOR HALF DUPLEX 


> TYPE MESSAGE 

>ALLOW INPUT CHECKING AGAIN 
;WAIT FOR INPUT 

> TEST IF CHAR IS A SPACE 

; BRANCH IF YES 

;DELAY FOR HALF DUPLEX 


> READY? 

*ECHO CHAR 

; CHECK 1F CHAR IS OF 
>NO, ERROR 

OK, PUT CHAR INTO R5 
»SHIFT INTO POSITION 5-3 


;WAIT FOR NEXT CHAP 
>CHECK IF A SPACE 
*>BRANCH IF SPACE 
>DELAY FOR HALF DUPLEX 


; READY? 

*ECHO CHAR 

*CHECK IF CHAR IS OF 
ERROR IN CHAR 


—__—_——_---+ 


ou4 Ci 


a0 
SEQ 0037 | 


ALL SPACES WILL BE IGNORED. AN ILLEGAL INPUT WILL BE FLAGED BY A “?" 
AND THE RETYPING sc} THE 


an 
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517 002212 060005 28300 AOD RO.RS ;OK,RS NOW = OCTAL TEST NO 

518 002214 104020 28400 35: READ ;WAIT FOR TERMINATION CHARACTER 

519 002216 023727 000700 O00040 28500 CMP TEMPCH. #40 CHECK IF SPACE 

520 002224 001773 28600 BEQ 3$ +BRANCH IF SPACE 

521 002226 012700 000036 28700 MOV #30. RO DELAY FOR HALF DUPLEX 

522 002232 104010 28800 DELAY 

523 002234 104017 28900 PRNT ; READY? 

524 002236 117777 176352 176354 29000 MOVB aTKB, aTPB ECHO CHAR 

525 002244 012737 O04001 000634 29100 MOV #4001, CNTLSW *SET BITS 11 8&0 

526 002252 023727 000700 000114 29200 CMP TEMPCH, #114 *NO, 1S IT AN "L" ? 

527 002260 001427 29300 BEQ 5$ BRANCH IF YES 

528 002262 023727 000700 000154 29400 CMP TEMPCH, #154 + CHECK LOWER CASE 

529 002270 001423 29500 BEQ 53 

530 002272 023727 000700 000123 29600 CMP TEMPCH, #123 +NO, 1S IT AN “S" 

53i 002300 001414 29700 BEQ 4$ BRANCH IF YES 

532 002302 023727 000700 000163 29800 CMP TEMPCH. #163 + CHECK LOWER CASE 

533 002310 001410 29900 BEQ 4§ 

534 002312 023727 000700 cot005é 30000 CMP TEMPCH, #56 1m, IS ITA *.” 7 

535 002320 001052 30100 BNE 8$ +NO, ERROR 

536 002322 012737 OO00CO1 000634 30200 MOV #1, CNTLSW + YES SET ONLY BIT 0 IN CONTROL WO 

537 002330 Cc00403 30300 Br 5$ 

538 002332 012737 OO00401 000634 30400 4%: MOV #401, CNTLSW *SET BITS 8 & O 

539 002340 012737 900006 00004 30500 5%: MOV #6, MACHER ; CLEAN UP 

540 002346 012706 G00e00 30600 MOV #SPBOT, SP > INIT SP 

541 002352 020527 000040 30700 CMP RS, #46 + 1S THIS AN 170 TEST 

542 002356 103033 30800 BHIS 8$ BRANCH IF YES 

543 002360 020527 000030 30900 CMP RS, #30 + 1S THIS AN OPTION TEST? 

544 002364 103007 31000 BHIS 6$ ;SKIP IF YES 

545 002366 020527 000020 31100 CMP RS, #20 1S THIS AN ECHO TEST 

546 002372 103404 31200 BLO 6$ *BRANCH IF NOT 

547 002374 012737 000001 000634 31300 MOV #1, CNTLSW FORCE ECHO TEST TO A SINGLE RUN 

548 002402 000402 31400 BR 7% ;LEAVE THIS TERMINAL AS CONSOLE 

549 002404 004737 003700 31500 = 6: JSR PC, CONIT ;RESET CONSOLE TERMINAL ADDRESS 

550 002410 052737 000200 000644 31600 7%: BIS #B1T7,PRGID BYPASS SCOPING 

551 002416 000241 31700 CLC CLEAR C BIT 

552 002420 006105 31800 ROL RS 

553 002422 016537 002522 000640 31900 MOV PRGTAB(RS).NXTST; ADDR OF TEST TO NXTST 

654 002430 023727 000640 001700 32000 CMP NXTST. #WAI TF ;CHECK IF TEST EXISTS 

655 002436 001403 32100 BEQ 8$ BRANCH IF NOT 

556 002440 104024 32200 FORWD >SET UP TEST PARAMETERS 

557 002442 000177 176230 32300 JMP dCURTST GO TO TEST 

558 002446 104017 324800 = 8S: PRNT *CHECK IF PRINTER 1S READY 

559 002450 112777 000077 176142 32500 MOVB #77, @TPB *SEND A ' 

560 00245e¢ 000601 32600 BR TTY1B : TRY AGAIN 





MAINDEC-11-DZLAC-D 


DZLACD. 


Pil 


002460 
002466 
002470 
002472 
002500 
002502 
002504 
002510 
002514 
002520 
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023727 
103001 
000207 
023727 
101401 
000207 
062716 
013700 
042700 
000207 


000700 000060 


000700 000067 


000002 
000700 
177770 


16-NOV-77 
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+ TESTC--CHECKS THAT THE INPUTTED CHARACTER IS BETWEEN O AND 7 INCLUSIVE 
TESTC: 


1$: 


23: 


TEMPCH, #60 
1$ 


PC 
TEMPCH. #67 
2$ 


PC 

#2, dSP 
TEMPCH, RO 
| alc 


+ CHECK ‘ fa" AND EQ OR GT O 
+BRANCH IF CK 

+ ERROR RETURN 

+CHECK IF EQ OR LT 7 

+BRANCH IF OK 

ERROR RETURN 

+SET UP RETURN ADDRESS 

+GET CHAR 

+ SAVE ONLY THE DIGIT 

NORMAL RETURN 


SEQ 0016 
SEQ 0039 


630 002700 001700 39600 WAI TF > SPARE 


8 4 

MAINDEC-11-DZ2LAC-D MACY11 30(104%6) 16-NOV-77 16:02 PAGE 2-8 SEQ 0017 
DZLACD. P11 16-NOV-77 15:57 PROGRAM INITIALIZATION & CONTROL SEQ 0040 

575 002522 007402 34100 PRGTAB: PTO ;DATA PATH TEST 

576 002524 007456 34200 PT1 PRINTER CHARACTER TEST 

577 002526 007600 34300 PTZ ;NON-PRINTING CHARACTER TEST 

578 002530 010164 34400 PT3 ; CARR |AGE RETURN TEST 

579 002532 010304 34500 PTY +MULTIPLE LINE FEED TEST 

580 002534 010462 34600 PTS + SINGLE LINE TEST 

581 002536 010666 34700 PT6 ;BACKSPACE TEST 

582 002540 011054 34800 PT? /OVERPRINT TEST 

583 002542 011266 34900 PT10 PRINTING FREQUENCY SWEEP TEST 

584 002544 01142 35000 PT11 +RIBBON FEED TEST 

585 002546 611456 35100 PT12 ‘PRINTER BELL TEST 

586 002550 001700 35200 WAI TF + SPARE 

587 002552 001700 35300 WAI TF + SPARE 

588 002554 001700 35400 WAI TF + SPARE 

589 002556 001700 35500 WAI TF + SPARE 

590 002560 011546 35600 PT17 sLIFE TEST 

591 002562 012116 35700 £020 + CHARACTER ECHO TEST 

592 002564 012166 35800 E021 +LINE ECHO TEST. FAST RATE 

593 002566 012224 35900 E022 *LINE ECHO TEST, SLOW RATE 

594 002570 012476 30000 E023 + CHARACTER/CODE ECHO TEST 

595 002572 013020 36100 E02 ;SELECTIVE PATTERN ECHO TEST 

596 002574 013566 36200 E025 *BELL ECHO TEST 

597 002576 001700 36300 WAI TF > SPARE 

598 002600 001700 36400 WAITF + SPARE 

599 002602 001700 36500 WAI TF > SPARE 

600 002604 601700 36600 WAI TF ; SPARE 

601 002606 001700 36700 WAI TF ; SPARE 

602 002610 001700 36800 . WAI TF > PRARE 

603 002612 001700 36900 WAI TF > SPQRE 

604 002614 001700 37000 WAI TF : SPARE 

605 002616 001700 37100 WAI TF > SPARE 

606 002620 001700 37200 WA! TF ; SPARE 

607 002622 005276 37300 ATO :170 TEST NO. 4O 

608 002624 005330 37400 aTl +170 TEST NO. 41 | 

609 002626 005362 37500 AT2 : 170 TEST NO. 42 

610 002630 005414 37600 AT3 +170 TEST NO. 43 

611 002632 005446 37700 ATY 7170 TEST NO. 44 

612 002634 005536 37800 ATS >170 TEST NO. 45 

613 002636 005614 37900 AT6 1/0 TEST NO. 46 

614 002640 005704 38000 AT? 7170 TEST NO. 47 

615 002642 005754 38100 AT10 > 170 TEST NO. 50 

616 002644 006012 38200 AT1i 7170 TEST NO. 51 

617 002646 006052 38300 AT12 +170 TEST NO. 52 

618 002650 006126 38400 AT13 *170 TEST NO. 53 

619 002652 006206 38500 AT14 +170 TEST NO. 54 

620 002654 00627 38600 ATi5 *170 TEST NO. 55 

621 002656 006372 38700 AT16 - 170 TEST NO. 56 

622 002660 006440 38800 AT17 +170 TEST NO. 57 

623 002662 006510 38900 AT20 170 TEST NO. 60 

624 002664 006602 29000 AT21 +170 TEST NO. 61 

625 002666 006702 39100 AT22 +170 TEST NO. 62 

626 002670 007010 39200 AT23 +170 TEST NO. 63 

627 002672 007122 39300 AT24 >LS! TEST NO. 64 

628 002674 007222 39400 AT2 *LS! TEST NO. 65 

629 002676 007300 39500 AT26 ‘LS! TEST NO. 66 





os 
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631 002702 001700 39700 WAI TF + SPARE 
632 002704 001700 39800 WAI TF + SPARE 
633 002706 001700 39900 WAI TF ; SPARE 
634 002710 001700 40000 WAITF + SPARE 
635 002712 001700 40100 WAI TF + SPARE 
636 002714 001700 40200 WAI TF + SPARE 
637 002716 001700 40300 WAITF ; SPARE 
638 002720 001700 40400 WAI TF + SPARE 
639 40500 
640 40600 =; AXKKKKKKKK 
641 NG70G 40 SEAT INT soeesencoees SERVICE ROUTINE FOR TRAPS THROUGH 
642 40800 =; LOCATION 30 
b43 40900 =; AXKKKKKKKK 
644 41000 
645 002722 011646 41100 ENMTINT: MOV aSP, -(SP) +PUSH STACKED PC TO GET A WORK COPY. (Q) 
e46 002724 162716 000002 41200 SUB #2, aSP ;SUB 2 TO POINT TO CALLING TRAP INSTR. 
647 002730 017616 900000 41300 MOV (SP), aSP +PLACE TRAP INSTR INTO THIS STACK WORK AREA. 
648 C02734 121627 000035 41400 CMPB aSP, #35 ;EXAMINE ITS RIGHT SIDE. (Q) 
649 002740 101402 41500 BLOS 2$ >BRANCH IF WITHIN RANGE OF ESTABLISHED TABLE. 
650 002742 000000 41600 1%: HALT ELSE HALT. 
651 002744 000776 41700 Bk 1$ 
652 002746 006116 41800 23%: ROL asP ;MULT INSTR BY 2 TO GET yr? DISPLACEMENT. 
653 002750 042716 177001 41900 Bic #177001, dSP +STRIP OFF OP CODE AND LS BIT 
654 002754 062716 002776 42000 ADD REMTTAB, aSP ; ADD IN STARTING ADDRESS OF TABLE. 
655 002760 017616 900000 42100 MoV (SP), aSP >FROM TABLE GET OUT DESIRED POINTER 
656 002764 005046 42200 CLR - (SP) ;PUSH A ZERO PSW. 
657 002766 012746 002774 42300 MOV #3$. -(SP) ;PUSH A PC = TO #3% OF THIS ROUTINE. 
658 002772 000002 42400 RTI DO RTI (POP-POP) TO ESTABLISH THE ZERO PSW. 
ae 002774 000136 Mone: 33: JMP a(SP)+ ; JMP TO ROUTINE LEAVING STACK AS FOUND 
66 4 
661 002776 003076 42700 EMTTAB: TYP +MESSAGE OUTPUT ROUTINE 
662 003000 003310 42800 ERR +170 TEST ERROR ROUTINE 
663 003002 003336 42900 EHLT > UNCONDITIONAL HALT 
664 O02004 003346 43000 STLSRV >KEYBOARD VECTOR/PRIORITY SETUP 
665 003006 003376 43100 STLSPV PRINTER VECTOR/PRIORITY SETUP 
666 003010 001412 43200 CHA INN COMMON TEST EXIT 
667 003012 000720 43300 CHLT +SR BIT 15 HALT 
668 003014 003154 43400 TYPM ;MESSAGE OUTPUT ROUTINE. MULTI DEVICES 
669 003016 003426 43500 DLY DELAY ROUTINE 
670 003020 001776 43600 TTY1 CONSOLE TERMINAL CONTROL 
67! 003022 033204 43700 SCRLF >; CARRIAGE RETURN-LINE FEED TO ALL DL11°S 
672 003024 063132 43800 SSCRLF > CARRIAGE RETURN-LINE FEED TO CONSOLE 
673 003026 003296 43960 SLF *>LINE FEED ONLY (TO ALL) 
674 003030 104314 44000 SPRTC PRINT CHAR 
675 003032 0603226 44100 SPRHOR PRINT TEST HEADER 
676 003034 004304 44200 SPRNT >PRINTER READY 
677 003036 004102 44 300 SREAD *READ CHAR 
678 003040 003630 44400 SAREAD +170 TEST READ ROUTINE 
679 003042 003216 44500 SCR CARRIAGE RETURN ONLY (TO ALL) 
680 003044 003776 44600 S$BTASC >BINARY TO ASCII CONVERSION 
681 003046 003552 44700 SF ORWD ;FORWARD ROUTINE ( BETWEEN TESTS } 
682 003050 004174 44800 SREADC 7READ CONSOLE KYBD ONLY 
683 003052 003072 44900 SPARET > SPARE EMT 
684 003054 003072 46000 SPARET >SPARE EMT 
685 003056 003072 45100 SPARET > SPARE EMT 


686 003060 003072 45200 SPARET ; SPARE EMT 
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' ©87 003062 003072 45300 SPARET ; SPARE EMT 
688 003064 003072 45400 SPARET ; SPARE ENT 
689 003066 0023072 45500 SPARET ; SPARE EMT 
690 003070 003072 45600 SPARET ; SPARE ENT 
691 003072 9000000 45700 SPARET: HALT ;HALT IF TRAP TO UNDEFINED 
692 003074 000776 45800 BR SPARET ;EMT 1S ATTEMPTED 
693 45900 
694 46000 
695 46100 
696 46200 
697 46300 _SBTTL COMMON ROUTINES USED BY LA36 TESTS 
63s 46400 
699 46500 «= | AXKKKKKKKE 
700 46600 
701 46700 ; THIS SECTION CONTAINS MOST ROUTINES CALLED BY 
762 46800 =; THE VARIOUS TESTS EITHER BY TRAPPING THROUGH LOCATION 
703 46900 ;30 OR BY SUBROUTINE CALLS (JSR PC, xxx) 
704 47000~—o; 
705 47100 eOOOOKX 
706 47200 
707 47300 =; TYPE-- A COMMON ROUTINE USED TO TYPE MESSAGES ON THE 
708 47400; CONSOLE TERMINAL ONLY. THE NULL CHARACTER TERMINATES 
709 47500—So THE MESSAGE. CALLED THROUGH AN EMT TRAP. 
710 47600—C: CALLING SEQUENCE 
711 47700_~—s TYPE 
712 47800; MESG ; ADDRESS OF MESSAGE 
713 47900; 
714 48000 «=: KRKKKEKKKK 
715 48100 
716 003076 011601 48200 ~=srTP: mov (SP).R1 :GET POINTER TO ADDR. OF MESG 
717 003100 062716 900002 48300 ADD #2, aSP 
718 003104 011101 48400 MOV (R1),R1 ;ADDOR. OF MESG TO R1 
719 003106 112100 4ygsoo Os «'18: MOVB (R1)+,R0 :GET CHAR 
720 002110 100402 48600 BMI 25 :BRANCH IF WANT AUTO CR-LF 
721 003112 001003 48700 BNE 3$ ;PRINT CHAR IF NOT NULL 
722 003114 o0u002 48800 RTI EXIT IF NULL CHAR 
723 003116 104013 4g900 = s 2S: SCRLF ; YES. SEND CR-LF 
724 003120 000772 49000 BP 1$ ;GET NEXT CHAR 
725 003122 104017. 49100 3%: PRNT PRINTER READY? 
726 003124 110077 175470 49200 MOVE RO. aTPB :LOAD PRINTER BUFFER WITH CHAR 
727 003130 000766 49300 BR 1$ ;GO GET NEXT CHAR 
728 49400 
729 003132 104017 49500 SSCRLF: PRNT ;PRINTER READY? 
+O 003134 112777 o0N015 175456@ 49600 MOVB #15, aTPB > SEND CR 
731 003142 104017 49700 PRNT >PRINTER READY? 
732 003144 112777 O0N012 17544e 49800 move #12. aTPB : SEND LF 


PTI >RETURN TO CALLEP 


003152 000002 


saticlssalieainialasdinbgiaiiiiaaiieeiiiceieeamiadadll 
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003154 
003156 
003162 
003164 
007166 
003170 
003172 
003174 
003176 
003200 
003202 


003204 
003206 
003212 
003214 


003216 
003222 
003224 


003226 
003232 
003234 


003306 
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011601 
062716 
011101 
112100 
100402 
001003 
000002 
104012 
000772 
104015 
000770 


104022 
012700 
104015 
000002 


012700 
104015 
000002 


012700 
104015 
104007 
014076 
013700 
006290 
006200 
006200 
042700 
062700 
104015 
013700 
042700 
062700 
104015 
104012 
104014 
000002 
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000002 


N00012 


600015 


9c0000 


000636 


177770 
000060 
000636 


177770 
000060 
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COMMON ROUTINES USED BY LA36 TESTS 


+ XXXXXXXXXX 


; TYPM===MULT TYPE-R COMMON ROUTINE TO OUTPUT 


We Be Be Be Be 


+> XXXXXXXXKK 
TYP™: MOV 
ADD 
MOV 
1S: MOVB 
BMI 
BNE 
RTI 
2S: CRLF 
BR 
3$: PRINTC 
Br 
SCRLF: CR 
SLF: MoV 
PRINTC 
Ti 
SCR: MOV 
PRINTC 
PTI 


eo 2 2 2 528 8 8 | 


“ROUTINE TO PRINT TEST HEALER 


Btttt tt ttt 


SPRHDR: MOV 
PRINTC 


1S NOT READY, 


(SP),R1 
#2, aSP 
(R1),R1 
(R1)+,R0 
2$ 

3$ 

1$ 


1$ 


#12,.R0 


#15,R0 


#0,P0 


RTNNO, PO 


RTNNO, RO 


#177770,R0 
#60, R0 


A MESSAGE ON ALL DL11S IF THE MULTI TEST 

SWITCH (BIT 13) IS SET. THIS ROUTINE IS USED BY 
THE PRINTER TESTS TO TYPE HEADINGS. IF A UNIT 
THE CHARACTER WILL NOT BE TYPED 


;GET POINTER TO ADOR OF MESG 


;ADDR OF MESG TO Ri 
+ GET CHAR 

;BRANCH IF WANT AUTO CR-LF 
; CONTINUE IF NOT NULL 

7 RETURN 

> YES, SEND CR-LF 

;NEXT CHAR 

;PRiNT CHAR 

;GO GET NEXT CHAR. 


+ SEND CR 

> SET LF CHAR 

+ SEND IT 

;RETURN TO CALLER 


> SET CR CHAR 
SEND IT 
, RETURN 


; TRANSMIT 
NUL CODE. 
>PRINT MESSAGE 


GET TEST NUMBER 
>GET FIRST DIGIT 


>MASK FIRST DIGIT 
>MAKE ASCII 

;PRINT DIGIT 

;GET TEST NUMBER AGAIN 
;MASK LAST DIGIT 

;MAKE ASC! 

SPRINT DIGIT 

> CR-LF 

>BLANK LINE 

>RPETURN 


SEQ 0020 
SEQ 0 
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003319 
003316 
003320 
003324 
003326 
002330 
003336 
603340 
CC3I4NZ 
003544 


003346 
003354 


003376 
003404 
003410 
003414 
003420 
003424 
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032777 
001404 
005737 
100001 
000002 
052737 
011600 
005740 
000000 
N00002 


017637 
062716 
013701 
012721 
013721 
o0u002 


017637 


000002 


MACY11 30(1046) 
15: 57 


040000 
000644 


100000 


000000 
000002 
000622 
9000C0 
000e24 


000000 
000002 
000626 
000000 
0006 30 


175376 


000044 


003366 


NO3416 


F 
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COMMON ROUTINES USED BY LA36 TESTS 


+ MXXREEREES 


ERRA-- COMMON ERROR RETURN FROM 1/0 TESTS. HALTS 
WITH ADDRESS OF ERROR IN RO. TO CONTINUE 


ON SAME TEST BUT NOT HALTING ON ERROR, 
: SET THE SCOPE BIT (14) = 1 AND PRESS CONTINUE 
ett ttt ttt 
ERR: BIT #SCOPSW, aSR ;CHECK SCOPE SWITCH 
BEQ 1$ [BRANCH IF NO SCOPE 
TST PRGID : SCOPING WANTED, FIRST ERROR? 
BPL 15 [BRANCH AND HALT ON FIRST ERROR 
RTI ; SCOPE EXIT 
1. BIS #BITIS.PRGID SET ERROR INDICATOR 
EHLT: MOV asP. RO 
TST = (RO) ;ADDRESS OF CALL INTO RO 
HAL T 
ERRHLT: RTI ;RETURN TO TEST FOLLOWING CALL 
;AAREEAEEE 


; STLSRU--- THIS ROUTINE SETS UP KEYBOARD INTERRUPT 
VECTOR AND PRIOITY. CALLING SEQUENCE 


, STRORV 
i AT20C ,LOCATION OF NEW INTERRUPT WECTOR 
TTT ttt 
STLSRV: MOV a(SP),STPRA+2 ;SET PETUPN ADP AND VECTOR 
ADD #2. aSP 
MoV TKYTR,R1 
STPRA: MOV #0. (R13+ 
MOV TKLVWL, (P14 
RTI 


Pees ee eee | 

SSTLSPV-- THIS ROUTINE SETS UP PRINTER INTERFUPT 
; VECTOR AND PRIORITY CALLING SEQUENCE 

3 STPCHV 

AT3S5E LOCATION OF NEW INTERRUPT WECTOR 


TTT TTi ttt 


STLSPV: MOV @(SP).STPPA+2 <>SET PETUPN ADF AND VECTOR 
ADD #2, @SP 
MOV TPUTR.R1 
STPPA: MOV #0, (R1)+ 
Mov TPLVL, (P1)+ 
RTI >RETUPN TO CALLEP 


SEQ 0021 
SEQ 004 


——— 
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003426 
003430 
003434 
003436 
003440 
007442 
003444 
003446 





010146 
013701 
005301 
001376 
005300 
001372 
012601 
02u002 
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COMMON ROUTINES USED BY LA36 TESTS 

61100 + MXEREIEREE 

61200 

61300 ; DELAY--A COMMON ROUTINE TO DELAY PROCESSING 

61400 =; A GIVEN NUMBER OF MSEC. 

61500; CALLING SEQUENCE: 

61600; MOV #5,R0 ;RO CONTAINS THE NUMBER OF MSEC DELAY DESIRED 

61700 =; DELAY 

61800 =: 

61900; THE DELAY IS EFFECTED BY THE EXECUTION OF THE LOOP; 

62000 =: 1$: DEC Ri 

62100 =: BNE 1% 

62200 =: 

62300 =; SINCE THE EXECUTION TIMES OF THE POP11 LINE DOES VARY FROM 

62400 SC; MACHINE TO MACHINE, THE VALUE AT SYMBOLIC LOCATION 

62500 _ =: “TIMER” MUST BE CHANGED TO THE APPROPRIATE VALUE AS SHOWN BELOW 
62600 BEFORE STARTING THE CIAGNOSTIC. “TIMER” IS INITIALIZED 

62700 FOR AN 11705, 11/10(=251) 

62800 =: 

02900) = - MACHINE 05810 35840 15820 LSI803 11745 & 11770 

63000 _ =, BIPOLAR MOS CORE 
63100 

63200 “L0OP: DEC R1 = 3.4 .99 2. 3 . 30 . $1 . 90 
63300 BNE LOOP 2.5 1. 76 2.6 . 60 . 98 1. 43 
63400 =: TIME= 5. 9USEC 2. 75 4.9 As . OUSEC 1. 49USEC 
63500 . SET TIMER 251 554 214 202 2127 1237 755 
63000; 

63790 > XXMKXKXXKK 

63800 

63900 OLY: MoV R1,-«SP) > SAVE P1 

64000 1% MoV TIMER. F1 ;MOV 1 MSEC LOOP CNT TO RI 

64100 2 DEC Pi >DECREMENT COUNT 

64 200 BNE 2$ ;BRANCH IF NOT ZERO 

64 300 CEC FO -DEC NO. OF MSEC DELAY 

64400 BNE 1% DELAY AGAIN IF NOT ZERO 

64500 Mou (SP ie. Rk! -RALL DONE PESTOPE R1 

64600 PT 


G 4 
2 PAGE 2-13 SEQ 0022 
SEQ 0045 
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} 

e22 64800: XXKKEEEEEE | 

gt. 64900 | 

B56 65000 ; PFAIL~-POWER FAIL ROUTINE | 

Bee 65100 SAVE ALL REGISTERS AND SET RESTART PDDRESS 

3m 65200 ~=C; INTO LOCATION 24 

3? 65300_—Sé=; 

388 65400 |; RESTART--POWER FAIL RECOVERY 

353 65500_—séo; RESTORE ALL REGISTERS AND GO TO START | 

39¢ 65600_—Ssé*—>; 

294 65700); RAEEKEKERE 

292 65800 | 

232 002450 010046 65900 PFARIL: MOV RO, -(SP) 

534 OOT4S2 O1014e 66000 MOV R1,-(SP) | 

235 002454 010246 66100 MOV R2,-(SP) | 

356 O024Se 010346 66200 MoV R3,-(SP) 

237 O07460 010446 66300 MoV RY, -(SP) 

235 GOs4e2 010546 66400 MOV RS, -(SP) 

3939 063464 013746 000024 66500 MoV 24, -(SP) 

900 003470 010637 OO3E04 06600 MoU SP. SAURO : SAVE STACK POSITION 

901 003474 012737 OO30e 900024 66700 MOV @RESTRT, 24 ; STORE RESTART ADDRESS 

902 003502 cooo0e 66800 HALT 

903 003504 900900 66900 SAYRE: WORD O 

904 003506 104007 67000 RESTRT. TYPEM 

905 003510 003542 67100 15 

906 003512 013706 oo7so% 7200 MoV SARE. SP >PESTORE STACK POINTE® 

907 003516 012637 O00024 67300 MoV (SP)+, 24 /PESTORE PFAIL ADDRESS 

908 003522 012605 67400 MoV (SP)+, RS 

909 003524 012604 67500 MoV (SP) +. RY 

910 003526 012603 67600 Mov (SP)+,P3 

911 003530 012602 67700 mow (SP)+,R2 

912 003532 012601 67800 MOu > «SP)4+,R1 

913 003534 012660 67900 Mow (SP) +, RO 

914 003536 000137 on1010 68000 MP START 

915 68100 

916 003542 o50200 o63517 051105 68200 18 ASCIZ <ACRLF> “POWER. “ACRLE 
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003552 
003556 
002562 
003566 
003572 
003574 
003600 
003604 
003610 
OO3e12 
003620 
003626 
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012705 
012537 
012537 
105737 


000-ee 


000640 
000636 
000640 
000644 


000660 
000642 
00076 


177777 


noo0001 


000642 
NGGeed 
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COMMON ROUTINES USED BY LA36 TESTS 
; RXREKEREEE 


;FORWARD--THIS ROUTINE TRANSFERS THE 2 OR 4 ARGUMENTS 
FROM THE TEST ROUTINE. THEY ARE; 


1- ROUTINE NUMBER 

2- ADDRESS OF NEXT TEST 

3- ITERATION COUNT (170 TESTS ONLY) 

4- SCOPE ENTRY ADDRESS (170 TESTS ONLY) 


SttT ttt ttt 


68500 
68600 
68700 
68800 
68900 
69000 
69100 
69200 
69300 
69400 
69500 
69600 
69700 
69800 
69900 
70000 
70100 
70200 
70300 
70400 
70500 
70600 
70700 
70800 


; 
; 
, 
, 


SF ORWD: 


FORWDA: 
FORWOB: 


MOV 


NXTST,R5 ADDR OF NEXT TEST TO RS 
(R5)+,RTNNO +GET NUMBER OF NEXT TEST 
(R5)+, NXTST +GET ADOR OF FOLLOWING TEST 


PRGID ; CHECK IF 170 TEST 
FORWDB ;SKIP THE FETCH OF ITER CNT AND SCOPE 
(R5)+, ICTR ;GET ITERATION COUNT 
(R5)+, SCOPTR ;GET SCOPE ENTRY POINT 
RS, CURTST ;ENTRY POINT TG TEST IN CUR TST 
; EXIT 
#-1,SCOPTR ;FORCE NO SCOPE 
#1, 1CTR ;FORCE INTERATION COUNT OF 1 
FORWDA 


SEQ 0024 | 
SEQ 0047 | 
| 
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0023630 
003636 
003644 
003650 
003654 
003656 
003662 
003664 
003670 
003672 
003674 
003676 


007700 
003704 
003710 
003712 
003716 
003720 
003726 
003732 
003734 
003742 
003746 
003754 
003762 
003770 


003772 
003774 
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012737 
052777 
005077 
105777 
100410 
012700 
104010 
005337 
001367 
104902 
000755 
000002 


013700 
010037 


062737 
000207 


000000 
000000 
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000200 
000004 
174750 
174736 


000001 
000664 


000602 
000612 


000614 


000616 
000616 


000620 
000620 
000604 
000604 
000004 


000664 
174752 


003772 


003774 


000622 
000626 
N00626 
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COMMON ROUTINES USED BY cate TESTS SEQ 0048 
71000 + KEXKEEEEEE 
71100 
71200  AREAD--A ROUTINE WHICH, THROUGH THE FACILITY OF 
71300 =; THE MAINTENANCE BIT. OUTPUTS TO THE 
71400) =; PRINTER BUFFER AND READS THE KEYBOARD 
71500 =; STATUS DONE. IF THE DONE IS NOT SET 
71600 =; WITHIN 200 MSEC, THE CPU WILL HALT WITH 
71700 =; THE LOCATION OF THE ERROR IN RO. PRESS . 
Abe ; CONTINUE TO CONTINUE WITH TESTS 
72000) «= - KXRKKKKKKK 
72100 
72200 SAREAD: MOV #200. BRCTR ;SET UP 200 MSEC DELAY 
72300 BIS #4, a9TPS ;SET MAINTENANCE BIT 
72400 CLR aTPB ;LOAD PRINTER BUFFER 
72500 1S: TSTB aTKs + CHECK DONE BIT 
72600 BMI 23 ;BRANCH iF DONE 
72700 MOV #1,R0 ;ONE TO RO 
72800 DELAY ; DELAY 1 MSEC 
72900 DEC BRCTR ;200 MSEC OVER 
73000 BNE 1$ ;BRANCH IF NO 
73100 EHALT 
73200 BR SAREAD ; TRY AGAIN 
73300 828: RTI ;RETURN TO TEST 
73400 
73500 + AAR AKEEEES 
73600 
73700 ; CONIT=-THIS ROUTINE SETS UP THE DEVICE ADDRESSES 
73800 AND INTERRUPT VECTORS FOR THE CONSOLE 
73900 TERMINAL. 

74000 ; 

74100 oO 9228 8 8 | 

74200 

74300 cCONIT: MOV CONADD, RO ; CONSOLE KEYBOARD STATUS ADDR TO RO 
74400 CONSETT: MOV RO. TKS ;KEYBOARD STATUS ADDRESS (777560) TO TKS 
74500 TST (RO)+ ; INCREMENT RO BY TWO 

74600 MoV RO. TKB ;KEYBOARD DATA ADDR (777562) TO TKB 
74700 TST (RO)+ , INCREMENT RO BY TWO 

74800 MoV TPS, TPSS , SAVE TPS OF LAST TERMINAL 

74900 MoV RO. TPS >PRINTER STATUS ADDR(777564) TO TPS 
75000 TST (RO)+ ; INCREMENT RO BY TWO 

75100 MoV TPB. TPBS ;SAVE TPS OF LAST TERMINAL 

75200 MoV RO, TPB >PRINTER DATA ADDR (777566) TO TPB 

75300 MOV CONVEC, TKVTR >KEYBOARD INTERRUPT VECTOR (60) TO TKVTR 
75400 MoV CONVEC, TPUTP 

75500 ADD #4, TPUTR >PRINTER INTERRUPT VECTOR (64%) TO TPYTR 
75600 RTS PC 

75700 

75800 _~=sSWxWT‘PSSS -WoRD C >LAST TERM STATUS REG ADR 

75900 TPBS: WORD 0 >LAST TERM BUFFER REG ADR 


O2L 
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003776 
004002 
004004 


004010 
004014 
004020 
004024 
004026 
004032 
004034 
004040 
004046 
004052 
004056 
004060 
004062 
004064 
004066 
004070 
004076 
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010237 
00€ 302 
062702 


014237 
005037 
163701 
103403 
005237 
C00772 
063701 
062737 
113720 
005337 
001354 
000002 
000000 
000000 
000000 
000001 
001750 


004062 
004070 


004066 
004064 
004066 


004064 


004066 
000060 
004064 
N04062 


000012 
023420 


N04064 


000144 


K 4 
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COMMON ROUTINES USED BY LA36 TESTS SEQ 0049 
76100 «=; REXKKKEKEE 

76200-—S; ' 

76300 ;BINARY TO ASC11 CONVERSION (1 TO 5 ASC11 CHARACTERS) 

76400 ;CALLING SEQUENCE 

76500 =; Mov ADDRESS OF LOC TO STORE FIRST ASC11 CHAR. INTO RO 
70600 Sl; MOV BINARY NUMBER TO BE CONVERTED INTO Ri 

76700: =; MoV NUMBER TO BE CONVERTED AS A POWER OF TEN INTO RZ 
76800 =; BTOASC 

76900_—S; 

77000 =, REHKKKKKKE 

77100 

77200 SBTASC: MOV RZ, CNVCTR SAVE TEN POWER 

77300 ASL R2 +R2%2 

77400 ADD #ADTENP, R2 CALCULATE ADDRESS OF 

77500 ; STARTING TEN POWER 

77600 = 18: MOV -(R2), TENPWR ;POWER OF TEN VALUE TO TEN FWR 
77700 CLR DIGIT + CLEAR CURRENT DIGIT 

77800 =—s 28: SUB TENPHWR, R1 +SUBTRACT TEN POWER FROM BINARY VALUE 
77900 BCS 3$ BRANCH IF END 

78000 INC DIGIT 

78100 Br 2$ 

78200 =—s 38: ADD TENPHWR, R1 RESTORE SUBTRACTED VALUE 

78300 ADD #60, DIGIT > CONVERT (DIGIT) TO ASCII 

78400 MOVE DIGIT, (RO)+ >PUT ASCII CHAR INTO USER BUFFER 
78500 DEC CNVCTR FINISHED ALL CHARS. CALLED FOR 
78600 BNE 1$ BRANCH IF NOT FINISHED 

78700 RTI - YES, EXIT 

78800 CNVCTR: .WORD 0 CONVERSION CHARACTER COUNT 
78900 §=DIGIT: .WOoRD O CONVERTED CHARACTER 

79000 TENPWR: .WORD OQ ; CURRENT TEN POWER 

79100 ADTENP: WORD 1.,10.,100. .1600. . 10000 
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004102 
004106 
004112 
004114 
004122 
004130 
004134 
004136 
004142 
004146 
004150 
004154 
004156 
004164 
004 166 
004172 
004174 
004200 
004202 
004210 
004216 
004224 
004232 
004240 
004246 
004250 
804254 
004262 
004 264 
004 266 
004272 
004274 
004300 
004302 


004 304 
004310 
004312 


004737 
005737 
001430 
013737 
013737 
10&777 
100005 
013700 
004737 
000415 
005337 
001404 
062737 
C00761 
105777 
100350 
105777 
100375 
117737 
113737 
042737 
113737 
042737 
023727 
001715 
012700 
042737 
005300 
001406 
106337 
103373 
105137 
000770 
900002 


105777 
100375 
000002 


003700 
000656 


000656 
000632 
174534 


000670 
003704 


000666 
000010 
174420 
174412 
174406 
000700 
177400 
000700 
177600 
000700 
000011 
000377 
000703 


000702 


174706 
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000666 
000670 


000670 


000700 
000704 
000704 
000703 
000700 
000004 


000702 
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COMMON ROUTINES USED BY cate TESTS , SEQ 0050 
79300 + AXXXXXXXXX 

79400 

79500 / READ-- A COMMON ROUTINE WHICH CHECKS THE KEYBOARD 

hes DONE FLAG & SETS A FLAG INDICATING CHAR PARITY 

79800 " AXXXXXXRXX 

79900 

80000 SREAD: JSR PC, CONIT ;RESET CONSOLE ADR AND VECTORS 
80100 TST DLCNT ;CHECK IF MULT! OL11‘°S AVAILABLE 
80200 BEQ SREADC ;NONE, WAIT FOR CONSOLE INPUT 
80300 1%: MOV DLCNT, COUNT3 SET DOL11 COUNT 

80400 MOV FSTOL. XCSR ;ADDRESS OF FIRST DL11 INTO XCSR 
80500 2%: TSTB aXCSR + TEST IF ANY INPUT 

80600 BPL 3$ CONTINUE IF NO INPUT 

80700 MOV XCSR, RO + SET THIS OL11 AS CONSOLE 
80800 JSR PC, CONSET 

80900 BR READ1 READ CHAR AND RETURN 

81000 3%: DEC COUNT 3 +DECREMENT DL11 COUNT 

81100 BEQ 4S ; TEST CONSOLE WHEN DONE OL11'S 
81200 ADD #10, XCSR NEXT DL11 ADDRESS 

81300 Bk 2$ ; CONT INUE 

81400 8 4S: TSTB aTKS + CHECK CONSOLE 

81500 BPL 1$ ;WAIT., NO INPUT 

81600 SREADC: TSTB dTKS + CHECK KEYBOARD DONE FLAG 
81700 BPL SREADC BRANCH IF NOT SET 

81800 READI: MOVB OdTKB. TEMPCH ; SAVE CHARACTER 

81900 MOVB TEMPCH, PCHAR / SAVE CODE WITH PARITr BIT 
82000 BIC #177400.PCHAR ;MASK UNWANTED BITS 

82100 MOVB TEMPCH, PARITY+1 ;SAVE CHAR WITH PARITY BIT 
82200 BIC #177600, TEMPCH ;MAKE !T 7 BIT ASCII 

82300 CMP TEMPCH, #4 DISREGARD EOT 

82400 BEQ SREAD 

82500 MOV #11,R0 >SET SHIFT COUNT 

82600 BIC #377, PARITY >CLEAR PARITY FLAG 

82700 =18: DEC RO >DECREMENT SHIFT COUNT 

82800 BEQ 2$ EXIT IF DONE 

82900 ASLB PARITY +1 SHIFT CODE 

83000 BCC 1$ ;CONTINUE IF BIT WAS ZERO 
83100 COMB PARITY CHANGE PARITY FLAG IF BIT WAS ONE 
83200 BR 1$ > CONT INUE 

83300 2%: RT! /SET, RET. TO CALLER 

83400 

83500 + XXXXXXXXXK 

83600 =; 

83700 :PRINT-- A COMMON ROUTINE TO CHECK THE PRINTER PEADY FLAG 
83800 = 

83900 + X¥XXXXXXAX 

84000 

84100 SPRNT: TSTB aTPS CHECK PRINTER READY FLAG 
£4200 BPL SPPNT >BRANCH IF NOT SET 

84300 RT| >SET. RETURN 


MAINDEC-11-DZ2LAC-D 
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004314 
004322 
004 330 
004334 
004336 
004 344 
004 350 
C04 356 
004 360 
004 364 
004 366 
004372 
004400 
004406 
004414 
004416 
004422 
004424 
004432 
0044 34 
004442 
OO4444 
004450 
004452 
004460 
004466 
004474 
004502 
004504 
004512 
004514 
004520 
004526 
004530 
004536 
004540 
004544 
004546 
004554 
004556 
004564 
004566 
004574 
004576 
004604 
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013737 
062737 
105777 
100375 
062737 
010077 
032777 
001003 
005737 
001002 
000137 
013737 
013737 
023727 
001543 
005737 
001140 
023727 
002004 
022737 
001130 
105777 
100125 
062737 
017737 
042737 

23727 
001006 
023727 
001002 
000137 
023727 
001427 
023727 


000441 


000602 
000004 
174356 
000002 
174342 
020000 
000656 
005034 
000656 
000632 
000636 
000710 
0306 36 
104011 
174220 
000002 
174204 
177600 
000700 
000636 


005150 
000700 


0006 36 
000700 
0006 36 
000700 
000636 
000700 


000712 
000712 
000712 
174336 


000666 
000670 
000032 


000026 
001700 


000670 
000700 
000700 
000003 


000024 


900177 
000017 


000021 
000662 
000022 
000662 


16-NOV-77 


16: 02 


PAGE 2-19 
COMMON ROUTINES USED BY Late TESTS 
+ RXREKEREEE 


;PRINTC--SENDS A CHARACTER AT A TIME FIRST TO THE 
CONSOLE DL1i1 THEN TO ALL MULTIPLE CL11S IF 


, 
, 
; 
, 
, 
, 
1$: 


2S: 
35: 


4S: 
53: 


6S: 


7S: 


8s: 


SR BIT 13 IS = 0. 


READY BIT IS NOT SET, 
SENT TO THAT PRINTER. ENTER WITH CHARACTER IN RO 


CALL: 
+ AXEKKKKX 
SPRTC: 


PRINTC 


CONADD, TEMP 
#4, TEMP 
oTEMP 

1$ 


#2, TEMP 

RO. dTEMP 
#B1T13, dSR 
2$ 

DLCNT 

3$ 

18$ 

DLCNT. COUNT3 


FSTOL. XCSP 
RTNNO, #32 


RTNNO, #20 

5$ 
#TTYCTL, WAI TF 
13$ 

@XCSR 

13% 
#2, XCSR 
aXCSR, TEMPCH 
#177600. TEMPCH 
TEMPCH, #3 

$ 


6 
RTNNO, #24 
6$ 


208 

TEMPCH. #177 
9$ 

RTNNO, #17 
7$ 
TEMPCH. R3 
12$ 

RTNNO. #21 
8$ 

TEMPCH, REPT 
12$ 

RTNNO, #22 
14% 

TEMPCH, REPT 
12$ 


IF THE REFERENCED PRINTER 
THE CHARACTER WILL NOT BE 


+ SET CONSOLE ADR 


;WAIT FOR CONSOLE READY 
+ SET ADR 

+LOAD CONSOLE PRINT BUFFER 
+CHECK SW 13 

;SEND ALL TERMS IF SW1i3 DOWN 
;CHECK IF MULTIPLE DL11'S 

+ CHECK FOR INPUT IF THERE 


PUT NO. DL11'S INTO COUNT3 

;ADOR OF FIRST DL INTO XCSR 
+CHECK IF TEST 32 

;DON'T CHECK FOR INPUT IF TEST 32 
; CHECK FOR INPUT? 


PRINTING TEST? 

;BRANCH IF NOT 

KEYBOARD CONTROL? 

>SKIP INPUT CHECK IF NOT 
> TEST IF ANY INPUT 
>CONTINUE IF NO INPUT 
+SET BUFFER ADDRESS 


+CHECK IF CONTROL-C 
CONTINUE IF NOT 

>CHECK IF TEST 24 
+CONTINUE IF NOT CONTROL-C 


;CHECK IF RUBOUT 
; YES. CHECK TEST NUMBER 


:BRANCH IF NOT 
* SAVE CHAR 
; CONT I NUE 
TEST 21? 
BRANCH IF NOT 
SAVE CHAR 

; CONTINUE 

> TEST 22? 
CONTINUE IF NOT 
; SAVE CHAR 

> CONT I NUE 


00 
SEQ 005 


SEQ 0028 | 
1 


nak bo 11-O0ZLAC-D 
O2L 11 


ACD. P 


004606 
004614 
004616 
004620 
004624 
004626 
004630 
004632 
004634 
004640 
004646 
004650 
004652 
004656 
004660 
004662 
004664 


005114 
005122 
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023727 


013737 
062737 
117737 
042737 


000636 


000036 


012174 
000636 


000036 


012232 
000¢ 36 


013154 
000036 
000700 
000002 
000002 
000602 
000004 
000712 
173700 
000002 
173664 
000666 
000002 
004406 
000002 
0006 36 
000710 
000636 
104011 
173504 
000602 
000002 


173572 
177600 


000021 


000022 


900024 


000670 
000670 
000712 
000712 
000670 


000670 


000670 
000670 
900032 


000020 
001700 


000712 
000712 
000700 
000700 
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90100 
90 


9S: 


108: 


115: 


12S: 


15%: 


16S: 


17%: 
18%: 


195: 


4 
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COMMON ROUTINES USED BY LA36 TESTS 


Che 


RTNNO, #21 
10% 


#30. ,R0 


E021A 
RTNNO, #22 
11$ 


#30. ,R0 


E022A 
RTNNO, #24 
228 


TERM 
#30. ,R0 


TEMPCH, RO 
14% 


#2, XCSR 

#2, XCSR 
CONADD, TEMP 
#4, TEMP 
TEMP, XCSR 

1 


19% 
#TTYCTL. WAI TF 
26$ 

dCONADD 

26% 

CONADD. TEMP 
#2, TEMP 


TEMP. TEMPCH 
#177600, TEMPCH 


SEQ 0029 
SEQ 0052 


+CHECK IF TEST 21 

NO. CHECK IF TEST 22 
*ASJUST STACK 

DELAY FOR HALF DUPLEX 


+YES, TEST 21 

PRINT TERMINATION MESSAGE 

+CHAIN TO NEXT TEST 

REPEAT TEST IF LOOP ON TEST SW SET 
CHECK IF TEST 22 

NO, CHECK IF TEST 24 

*ADJUST STACK 

+DELAY FOR HALF DUPLEX 


+ YES. PRINT TERMINATiON MESSAGE 


+CHAIN TO NEXT TEST 

+REPEAT TEST IF LOOP ON TEST SW SET 
+ TEST 24? 

+WAiT FOR NEXT TEST IF NOT TEST 24 
RESET STACK 

+ TERMINATE TEST 

+DELAY FOR HALF DUPLEX 


+ SET NEW CHAR 
; CONT I NUE 
SET STATUS ADDRESS IN XCSR 


*+CHECK IF CONSOLE TERM 
71S THIS OL 


> TEST PRINTER READY 

;WAIT FOR READY 

>SET XCSR TO PRINTER BUFFER 
>LOAD CHARACTER INTO BUFFER 
;DECREASE COUNT OF DL11°S 
-ALL DONE. EXIT 

»SET XCSR TO NEXT DL11 PRINTER STATUS 
;GO TEST NEXT DOL11 READY FLAG 
»SET XCSR TO PRINTER BUFFER 
;DO0 NOT LOAD BUFFER 

;CHECK IF TEST 32 

>;DON'T CHECK FOR INPUT IF TEST 32 
>WANT INPUT CHECK? 

>NO, BRANCH 

>PRINTING TEST? 

7BRANCH IF NOT 

> KEYBOARD CONTROL? 

;SKIP INPUT CHECK IF NCT 

> TEST IF ANY INPUT 

> BRANCH IF NONE 

>SET ADR 


*>MASK UNWANTED BITS 


DZLAC 


py we DZLAC-0 


D. 


005130 
005136 
005140 
005146 
005150 
005154 
005156 
005160 
005162 
005166 
005174 
005176 
005200 
005206 
005212 
005214 
005220 
005222 
005224 
005232 
005234 
005240 
005246 
005250 
005256 
005264 
005266 
005274 
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023727 
001013 
023727 
001007 
012700 
104010 
104012 
022626 
000137 
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000700 
000636 
000036 


013026 
000700 


000001 
002062 
000036 


000¢ 36 


000700 
000636 


000700 
000636 


800700 


000003 
000024 


000177 


000634 


000017 


000021 


000662 
N00022 


000662 


TEMPCH, #3 
21$ 
RTNNO, #24 
21$ 
#30..R0 


E0248 
TEMPCH, #177 
23% 


9% 
#1, CNTLSW 


(SP)+,RO 
RTNNO, #17 
245 
TEMPCH, R3 
RTNNO, #21 


25% 
TEMPCH, REPT 
RTNNO, #22 


Zz 


TEMPCH, REPT 
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95700 CMP 
95800 BNE 
95900 cMP 
96000 BNE 
96100 20%: MOV 
96200 DELAY 
96300 CRLF 
96400 POPSP2 
96500 JMP 
96600 21%: CMP 
96700 BNE 
96800 BR 
96900 8 22%: MOV 
97000 JMP 
97100 23%: Mov 
97200 MoV 
97300 DELAY 
97400 MOV 
97500 CMP 
97600 BNE 
97700 MOV 
97800 8 24%: CMP 
97900 BNE 
98000 MOY 
98100 25%: CMP 
98200 BNE 
98300 Mov 
98400 26%: RT} 
98500 


+ CHAR = CONTROL-C? 
; CONTINUE 1F NOT 
*TEST 24? 


NOT 


; CONTINUE IF 





SEQ 0030 
SEQ 0053 


DELAY FOR HALF DUPLEX 


+ SEND CR-LF 
+RESET STACK 


RETURN TO TEST 
1F RUBOUT 
;BRANCH IF NO 


; CHECK 


+CLEAR LOOP AND SEQUENCE BITS 
+GO WAIT FOR NEXT TEST 


; SAVE 


RO 
DELAY FOR HALF DUPLEX 


RESTORE RO 


+CHECK IF TEST 17 


BRANCH IF NOT TEST 17 
+ STORE INPUTTED CHAR 


+CHECK IF TEST 21 


BRANCH IF NOT TEST 21 
+ STORE INPUTTED CHAR 


+CHECK IF TEST 22 


BRANCH IF NOT TEST 22 
; STORE INPUTTED CHAR 


>RETURN TO TEST 


eee aS 


MAINDEC-11-DZ2LAC-D MAC 


DZLACD. P14 
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SEQ 0031 
SEQ 


0054 


SE 
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005276 
005300 
005302 
005304 
005306 
005314 
005320 
005322 
005324 
005326 


005330 
005332 
005334 
005336 
005340 
005346 
005352 
005354 
005356 
005360 








LAC-0 
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000940 
005330 
000012 
005314 
012737 
005777 
104005 
000774 
104001 
000774 


000041 
005362 
000012 
005346 
012737 
005777 
104005 
000774 
104001 
000774 
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005324 000004 


72oO7 
nr ed 


005356 900004 
173242 


D 
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170 LOGIC TESTS 


. -SBTTL 170 LOGIC TESTS 
ettttt ttt tT 


ONLY THE CONSOLE TERMINAL IS TESTED. 

UPON COMPLETION, THE CPU WILL EITHER HALT IF SR 

*BIT8 1S = 1 AND AWAIT FUTHER INSTRUCTIONS OR CONTINUE 
AND EXECUTE THE PRINTER TESTS CONTINOUSLY 

+ 1F AN 170 TEST FAILS, THE CPU WILL HALT AT ERRHLT 
;WITH THE ADDRESS OF THE ERROR IN RO (LOC 777700). PRESSING 
+ THE CONTINUE SWITCH WILL CAUSE THE 170 TEST TO 
CONTINUE WITH THE NEXT TEST. HOWEVER IF SWITCH 14 
*WERE SET. OR IS SET BEFORE THE CONTINUE SWITCH IS 
PRESSED, THE FAILED TEST WILL LOOP ON ITSELF 

+WITHOUT FUTHER HALTS 


reo % % & 9 3 8 3 0 | 
;ATO-- TEST #40--TESTS THE ABILITY TO REFERENCE THE 
; RECEIVER STATUS WORD (TKS) WITHOUT TRAPPING 
re 2 2S 9 9 3 3 8 8 | 


ATO: 40 > TEST NUMBER 
ATOX: ATi ;NEXT TEST 
10 > ITERATION COUNT 
; 1$ SCOPE ENTRY 
MoV #3, MACHER ;SET UP MACHINE ERROR TRAP 
1$: TST aTKS /REFERENCE RECEIVER STATUS WORD 
2: CHAIN ; CHAIN TO NEXT TEST 
BR 1$ REPEAT TEST 
3$: ERROR ERROR TRAPPED WHEN REFERENCING 
BR 2$ ;RECEIVER STATUS WORD (TKS) 


> KAXKEKEKAK 

;AT1--TEST #41--TESTS THE ABILITY TO REFERENCE THE 
; RECEIVER BUFFER (TKB) WITHOUT TRAPPING 

eS 2 oS 2 oo 8 8 | 


ATI: 41 > TEST NUMBER 

AT2 »NEXT TEST 

10. > ILTERATION COUNT 

1$ >SCOPE ENTRY 

MOV #3%, MACHER >SET UP MACHINE ERROR TRAP 
1: TST aTKB REFERENCE RECEIVER BUFFER 
2s: CHAIN CHAIN TO NEXT TEST 

BR 1$ >REPEAT TEST 
3S. ERROR > TRAPPED WHEN REFERENCING 

Be 2$ “RECEIVER BUFFER ‘TKB) 





SEQ 0032 
SEQ 0055 


| 
Sy SSS SSS Ss Ss SS ss Ss et ne 


e § 
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1270 04900) =; KXXKXXKKXK 
1271 05000 *AT2--TEST #42--TESTS THE ABILITY TO REFERENCE THE 
1272 05100 TRANSMITTER STATUS WORD (TPS) WITHOUT TRAPPING. 
1273 05200 etttt tt ttt 
1274 05300 
1275 005362 000042 05400 = = AT2: 42 ; TEST NUMBER 
1276 005364 005414 05500 AT3 +NEXT TEST 
1277 005366 000012 05600 10. ; ITERATION COUNT 
1278 005370 005400 05700 1$ + SCOPE ENTRY 
1279 005372 012737 005410 O00004 05800 MOV #3%, MACHER ;SET UP MACHINE ERROR TRAP 
1280 005400 005777 173212 05900 15: TST aTPS ;REFERENCE TRANSMITTER STATUS 
1281 005404 104005 06000 = 2S: CHAIN ; CHAIN TO NEXT TEST 
1282 o005406 000774 06100 BR 1$ ;REPEAT TEST 
1283 005410 104001 06200 =35: ERROR > TRAPPED WHEN REFERENCING 
1284 005412 000774 ree BR 23 ; TRANSMITTER STATUS WORD 
23s 64 
1236 06500 S00 ooo 
1287 06600 porars TEST #43--TESTS THE ABILITY TO REFERENCE THE 
i288 06700 TRANSMITTER BUFFER « TPB) WITHOUT TRAPPING 
1289 06800 ett ttt ttt 
1290 06900 
1291 005414 Q00043 07000-~=—=s ATS: 43 ; TEST NUMBER 
1292 O05416 O05446 07100 ATY ;NEXT TEST 
1293 005420 o00012 07200 10 ; ITERATION COUNT 
1294 005422 005432 67300 1$ ; SCOPE ENTRY 
1295 005424 012737 905442 o00004% 907400 MoV #33, MACHER ;SET UP ERROR TRAP 
1296 005432 005777 172162 07500 1$: TST aTPB ;REFERENCE TRANSMITTER BUFFER 
1297 005436 104005 07600 2s: CHAIN ; CHAIN TO NEXT TEST 
1298 005440 000774 07700 BR 1% ;REPEAT TEST 
1299 005442 104001 07800 38: ERROR ; TRAPPED WHEN REFERENCING 


1300 005444 900774 ; 07900 BR 2$ ; TRANSMITTER BUFFER 





OZL 


005446 
005450 
005452 


005534 


005536 
005540 
005542 
005544 
005546 
005552 
005556 
005560 
005566 
005572 
005574 
005576 
005604 
005606 
005610 
005612 


ays ag 11-DZ2LAC-D 
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000044 
005536 
000012 
005470 
012746 
012746 
000002 
052777 
032777 
001002 
104001 
000410 
042777 
032777 
001401 
104001 
104905 
000765 


00GO04S 
005614 
000012 
005560 
012746 
012746 
000002 
052777 
105777 
001775 
000005 
032777 
001401 
104091 
104005 
000762 
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000340 
005470 


000100 
000100 


000100 
000100 


000340 
005560 


000100 
173024 


000100 


173114 
173106 


173072 
173064 


173024 


173006 


,. 2 
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SEQ 0034 


SEQ 0057 


TEST #44--TESTS THE ABILITY iy SET AND CLEAR THE 


RECEIVER INTERRUPT ENABLE BIT 


aPRTY7,-(SP) 
#1$, - (SP) 


#B1T6, dTKS 
#BIT6,dTKS 
$ 


5% 
#BIT6, aTKS 
#B1T6, aTKS 
5$ 


1$ 


+ TEST NUMBER 
NEXT TEST 

; ITERATION COUNT 
+ SCOPE ENTRY 
SET PRIORITY 7 


+SET INTERRUPT ENABLE BIT 
+CHECK IF BIT IS SET 
BRANCH IF SET 

NOT SET, ERROR 

+ TRY AGAIN 

*CLEAR INTERRUPT ENABLE BIT 
*CHECK IF BIT 1S CLEARED 
BRANCH IF CLEARED 

;NOT CLEARED, ERROR 
>CHAIN TO NEXT TEST 

>D0 TEST AGAIN 


TEST #45--CHECKS THAT THE RECEIVER INTERRUPT 


ENABLE BIT CAN BE CLEARED WITH RESET INSTRUCTION. 


16-NOV-77 
170 LOGIC TESTS 
08100 ; XxXXxxXKxKKKX 
08200 i ATY-~ 
08300 
08400 [OEE 
08500 
08600 ATH: 4y 
08700 ATS 
08800 10. 
08900 1$ 
09000 MoV 
09100 MoV 
09200 RTI 
09300 1$: BIS 
09400 BIT 
09500 BNE 
09600 = 2S: ERROR 
09700 BR 
09800 35: BIC 
99900 BIT 
10000 BEG 
10100 4§: ERROR 
10200 ~=—s 5S: CHAIN 
10300 BR 
10400 
10500 > MARE 
10600 ; ATS-- 
10700 ; 
10800 mrcrtst ett 
10900 ; 
1100 ATS: us 
11100 ATo 
11200 10. 
11300 1$ 
11400 MOW 
11500 Nov 
1600 RTI 
11700 1$: BIS 
11800 Ri TSTB 
11900 BEG 
2000 RESET 
12100 BIT 
12200 BEG 
12300 EPROP 
12400 28 CHAIN 
12500 GF 


#PRTY7, -(SP) 
#1$,-<SP) 


#BiTo, aTKS 
aTPS 

3$ 

#BiTe. ath 
2$ 


1$ 


> TEST NUMBER 

>NEXT TEST 

; ITERATION COUNT 
>SCOPE ENTRY 

>SET PRIORITY TO 7 


;SET INTERRUPT ENABLE BIT 

>;BE SURE PRINTER |S DONE WITH OL11S1 MESSAGE 
-BEFORE ALLOWING FOLLOWING RESET 

RESET 

> TEST INTERRUPT ENABLE BIT 

>BRANCH IF CLEARED 

>STILL SET. ERROR 

>CHAIN TO NEXT ROUTINE 

-PEPEAT TEST 





MAINDEC-11-DZ2LAC-D 


DZLACD 


1348 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
1358 
1359 
1360 
13e1 
1362 
1362 
1364 
1365 
1366 


1384 
1385 
? 


1387 
1388 
1389 
1730 


Pil 


005614 
005616 
005620 
005622 
005624 
005630 
005634 
005636 
005644 
005652 
005654 
005656 
005660 
005666 
005674 
005676 
005700 
005702 


005704 
005706 
005710 
005712 
005714 
005720 
005724 
005726 
005734 
005736 
005744 
005746 
006750 
o0s7s2 
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000046 
005704 
000012 
005636 
012746 
012746 
000002 
052777 


0060047 
005754 
000012 
005726 
012746 
012746 
000002 
052777 
000005 
032777 
001401 
104001 
104005 
000755 
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000340 
005636 


000100 
000100 


000100 
000190 


000340 
005726 


000100 
000100 


172752 
172744 


172730 
172722 


172662 
172652 


G 5 
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> RXXXKEKEEE 
+ATo-- TEST#46--TESTS THE ABILITY TO SET AND CLEAR 
; TRANSMITTER INTERRUPT ENABLE BIT. 


ett ttttt 

ATs: 46 ; TEST NUMBER 
AT? “NEXT TEST 
10. ITERATION COUNT 
15 >SCOPE ENTRY 


MOV RPPTY7,-(SP) >SET PRIORITY TO 7 
MOV #19, -(SP) 


RTI 

1$: BIS #B1T6,aTPS >SET INTERRUPT ENABLE BiT 
BIT #BIT6,aTPS >CHECK THAT BIT IS SET 
BNE 2$ ;BRANCH IF SET 
ERROR NOT SET, ERROR 
BR 3$ 7 TRY AGAIN 

2S. Bic #BiTe.aTPS *CLEAR INTERRUPT ENABLE BIT 
BIT #BiTe,.aTPS ;CHECK IF BIT 1S CLEARED 
BEG 3$ BRANCH IF CLEARED 
ERROR >NOT CLEARED, ERROR 

3$: CHAIN CHAIN TO NEXT TEST 
BR 1$ *DO AGAIN 

fe 22 29% 8 0 8 | 


;AT7-- TEST #47--TESTS THE ABILITY TO CLEAR TRANSMITTER 
; INTERRUPT ENABLE BIT WITH RESET !NSTRUCTION 
22259 3 8 8 8 | 


AT? 47 > TEST NUMBER 
AT10 >NEXT TEST 
10 > ITERATION COUNT 
1$ > SCOPE ENTRY 
MOU #PRTY7, -(SF) :SET PRIORITY TO 7 
MoV #19.-158) 
RTI 
1§ BIS #B'To. dTFS >SET (INTERRUPT BIT 
RESET -RESET 
BIT #B1Te @TPS -CHECK IF BIT I'S CLEARED 
BEQ zs >BRANCH IF CLEARED 
ES POR -ERPORP. RESET DIO NOT CLEAP BIT 
24% CHAIN >CHRIN TO NEXT POUTINE 
ge 1% PEPERT TEST 


SEQ 0035 


SEQ 0058 






SEQ 0036 


H 5§ 
MAINDEC-11-DZLAC-D MACY11 30(1046) 16-NOV-77 16:02 PAGE 3-4 
SEQ 0059 , 
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1392 17100) =; RXXKKEKEKE 

1393 17200 *AT10-- TEST #50--CHECKS THAT RESET SETS THE TRANSMITTER 
1394 17300 READY BIT AND THAT THE READY BIT CAN BE READ RELIABLY. 
1395 17400 Bttttttttt: 
1396 17500 

1397 005754 000050 17600 =AT10: 50 ; TEST NUMBER 

1398 005756 006012 17700 AT11 NEXT TEST 

1399 005760 000012 17800 10. > ITERATION COUNT 

1400 005762 005764 17900 1$ SCOPE ENTRY 

1401 005764 032777 O01000 172722 17920 15%: BIT #LS111, SR +SKIP TEST IF AN LSI-11 
1402 005772 001005 17940 BNE 2$ 

1403 005774 000005 18000 RESET ; RESET 

1404 005776 106777 172614 18100 TSTB aTPS > CHECK TRANSMIT READY BIT 
1405 006002 100401 18260 BMI 2$ ;BRANCH IF SET 

1406 006004 104001 18300 ERROR ERROR, RESET DID NOT SET READY BIT 
1407 O006006 104005 18400 2% CHAIN CHAIN TO NEXT TEST 

1408 006010 00C765 18500 BR 1$ +00 AGAIN 

1409 18600 

1410 18700 «| RAKE KEKE 

1411 18800 /ATI1-~ TEST #51--TESTS THAT THE TRANSMITTER READY RESETS 
1412 18900 BY LOADING THE TRANSMITTER BUFFER. 

1413 19000 aie 

1414 19100 

1415 006012 000051 19200 =ATII1: 51 > TEST NUMBER 

1416 006014 006052 19300 ATiZ ;NEXT TEST 

1417 006016 000012 19400 10. > ITERATION COUNT 

1418 006020 006022 19500 1$ SCOPE ENTRY 

1419 006022 012700 900226 19600 «18: MOV #226, F0 

1420 006026 104010 19700 DELAY *DELAY 150 MSEC. 

1421 006030 900005 19800 PESET ; RESET 

1422 006032 005077 172562 19900 CLR aTPB >LOAD TRANSMITTER BUFFER 
1423 006036 105777 172554 20000 TSTB aTPS CHECK TRANSMIT READY BiT 
1424 006042 100001 20100 BPL 2$ :BRANCH !F CLEARED 

1425 006044 104001 202C0 ERROR /-NOT CLEARED, ERROP 

1426 006046 104005 20300 cs CHAIN >CHAIN TO NEXT TEST 


006050 O0U76e4 20400 BR 1§ »PEPEAT TEST 
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1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 


1456 
1457 


1466 
1407 
1468 
1469 
1470 


1475 


11 


006052 
006054 
006056 
0606060 
006062 
006064 
006066 
006070 
006074 
006076 
006102 
006104 
006112 
006114 
006116 
006120 
006122 
006124 


006126 
006130 
006132 
006134 
006136 
006140 
006142 
006146 
006152 
006154 
006160 
006166 
006: 70 
006174 
006176 
006200 
006202 
006204 


000052 


006035 
006206 
000012 
006142 
104004 
006200 
013746 
012746 
000002 
005077 
052777 
000240 
005077 
104095 
000761 
022626 
104001 
000771 


MACY11 30(1046) 


172522 
006104 
000100 


000630 
006154 


172436 
000100 


172422 


172504 


172430 


| § 
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SEQ 0037 
SEQ 006 


*+ATI2-- TEST #52--CHECKS THAT THE TRANSMIT READY BIT CAN 
CAUSE AN INTERRUPT 


;AT13-- TEST#S3--TESTS THAT THE 


TPS 
- (SP) 
#25, - (SP) 


#BiTe, aTPS 


1$ 
3$ 


; TEST NUMBER 

+NEXT TEST 

+ ITERATION COUNT 

SCOPE ENTRY 

4 hg TRANSMITTER INTERRUPT VECTOR 


TO 3$ 

+SEE CHAINY COMMENT 
+DISABLE TRANSMIT INTERRUPT 
;SET PRIORITY TO ZERO 


+ ENABLE TRANSMIT INTERRUPT 


; TRANSMIT READY CID NOT CAUSE INTERRUPT 
+CHAN TO NEXT TEST 

REPEAT TEST 

; INTERRUPT OCCURED, CLEAN STACK 

+CHAIN TO NEXT TEST 


TRANSMIT READY DOES NOT CAUSE AN 


INTERRUPT WHEN THE PROCESSOR IS AT THE SAME LEVEL 


16-NOV-77 
170 LOGIC TESTS 
20600) =; KXXKKXKKKK 
20700 
20800 
20900 SOOO 
21000 
21100 AT12: 52 
21200 AT13 
21300 10. 
21400 1$ 
21500 STPCHV 
21600 $ 
21700 15: RESET 
21800 CLR 
21900 CLR 
22000 rs an 
2100 RTI 
22200 = 2S: BIS 
22300 NOP 
22400 ERROR 
22500 = 3: CHAIN 
22600 Br 
22700) 3=44S: POPSF2 
22800 BR 
22900 
23000) «=| KXKKKKKYKK 
23100 
23200 
23300 STTTIT TTT 
23400 
23500 = = ATI13: 35 
23600 AT14 
23700 10. 
23800 1$ 
23900 STPCHW 
24000 4s 
24100 1%: MoV 
24200 MOV 
24300 PTI 
4400 = 2: CLP 
24500 BIS 
24600 NOP 
24700 3=3: CLR 
24800 CHAIN 
24900 BR 
25000 = =(4S: POPSPS 
25100 ERP oP 
25200 Be 


TPLVL.- (SP) 
#29. -0SP; 


aTPs 
#BiTo.aTPS 


aTFS 
1$ 


3$ 


> TEST NUMBER 

;NEXT TEST 

> ITERATION COUNT 

: SCOPE ENTRY 

»SET UP TRANSMIT INTERRUPT 

> VECTOR TO 35% 

>SET PROCESSOR TO SAME LEVEL AS XMITTER 


-DISABLE TRANSMITTER INTERRUPTS 
ENABLE TRANSMITTER INTERRUPTS 


>OK, NO INTERRUPT OCCURED 
CHAIN [QO NEXT TEST 

/REPEAT TEST 

» INTERRUPT OCURPED. ERROP. CLEAN 
»UP STACK 

>CHAIN TO NEXT TEST 


pg = -DZLAC-D 


DZLACD. P 


006206 
006210 
006212 
006214 
006216 
006220 
006222 
006226 
006232 
006236 
006242 
006244 
006252 
006254 
006256 
006260 
006262 
006266 
006270 
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000054 


000754 


172370 
000630 
000046 
006244 


000100 


172344 


J 5 
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> KEKKEEKEEE 
sATI4-- TEST#S4--TESTS THAT THE TRANSMIT READY DOES CAUSE AN 
; INTERRUPT WHEN THE PROCESSOR IS AT A PRIORITY LEVEL 


ONE LOWER THAN THE TRANSMIT INTERRUPT REQUEST LEVEL 
Pittttttt tT) 


AT14: 54 + TEST NUMBER 
AT15 NEXT TEST 
10. + ITERATION COUNT 
1$ SCOPE ENTRY 
STPCHV ;SET UP TRANSMIT INTERRUPT 
3$ VECTOR TO 2$ 


18: CLR aTPs +DISABLE TRANSMIT INTERRUPTS 
MOV TPLUL. -(SP) SET PROCESSOR PRIORITY ONE 


SUB #40, (SP) ;LEVEL LOWER THAN TRANSMITTER 
MoV 82%, -(SP) 
RTI 
2S: BIS #BlTe, aTPS > ENABLE TRANSMITTER INTERRUPTS 
NOP 
ERROR ;NO INTERRUPT, ERROR 
Br 4S CHAIN TO NEXT TEST 
3: POPSF2 ; INTERRUPT OCCURED, OK, CLEAN STACK 
4: CLR aTPS >DISABLE TRANSMITTER INTERRUPTS 
CHOIN >CHAIN TO NEXT TEST 
BP 1$ /PEPEAT TEST 


SEQ 0038 


SEQ 0061 


- 


MAINDEC-11-DZLAC-D 


DZLACD. P 


11 


006272 
006274 
006276 
006300 
006302 
006304 
006306 
006312 
006314 
006320 
006322 
006330 
006332 
006334 
006340 
006342 
006344 
006352 
006356 
006360 
006362 
006364 
006366 
006370 


006372 
006374 
006376 
006400 
006402 
006410 
006412 
006416 
006420 
006422 
006424 
006430 
006432 
0064 34 
0064 36 
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000055 


104001 
000761 


000056 
006440 
000012 
006402 
032777 
001011 
012700 
104010 
104021 
000005 
105777 
100001 
104001 
104005 
0007706 


MACY11 30(1046) 
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172304 
006322 
000100 


172256 


006364 
006360 


001000 
000226 


172266 


172254 


172304 


16-NOV-77 
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;axx 


K_ 5 
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LoS S89 8 | 


;ATIS-- TEST#55--TESTS THAT THE TRANSMIT READY DOES NOT 
REINTERRUPT AFTER AN RTi WHEN THE READY BIT HAS 
NOT BEEN RESET. 


, 


hee 


AT15: 


1$: 


23: 


3$: 


4S: 


5S: 


6S: 


be 2 © | 


XXXKKEE 


KKAKEKE 


aTPsS 
- (SP) 
#2$, - (SP) 


#BIiT6,aTPS 


aTPS 


1$ 
#6$, DTPVTR 
#5%, dSP 


3$ 


+ TEST NUMBER 

NEXT TEST 

+ ITERATION COUNT 

SCOPE ENTRY 

4-\ TRANSHIT INTERRUPT VECTOR 


3 
+DISABLE TRANSMITTER INTERRUPTS 
+ SET PROCESSOR PRIORITY TO ZERO 


+ ENABLE TRANSMITTER INTERRUPTS 


;ERROR1, TRANSMITTER FAILED TO INTERRUPT 
;DISABLE TRANSMITTER INTERRUPTS 

;CHAIN TO NEXT TEST 

;REPEAT TEST 

; INTERRUPT OCCURED, CHANGE INTERRUPT 

+ VECTOR TO 5$ AND RETURN TO 4% 

RETURN FROM INTERRUPT 


> CHAIN TO NEXT TEST 

;ERRORZ. TRANSMITTER RE INTERRUPTED 
AFTER RTI WITH READY BIT LEFT ON. 
CLEAN STACK, CHAIN TO NEXT TEST 


>; AT160--TEST#S56--CHECKS THAT PESET CLEARS THE RECEIVER DONE BIT 


> 2K 


AT 16: 


2: 


35: 


22228 8} 


@LSi1i-aSPr 
3$ 
#226,P0 


aTKS 
3$ 


+ TEST NUMBER 

;NEXT TEST 

> ITERATION COUNT 
SCOPE ENTRY 

SKIP TEST IF LSI-11 


>DELAY 150 MSEC. 

ENABLE RECEIVER 

-RESET 

> TEST DONE BIT 

>BRANCH IF DONE IS CLEARED 
>NOT CLEARED, ERROR 

‘CHAIN TO NEXT TEST 
>REPEAT TEST 


SEQ 0039 
SEQ 


0062 
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1554 33100 =; RKXKKEKEKE 
1555 33200 #ATI7-- TEST#57--CHECKS THAT REFERENCING THE RECEIVER BUFFER 
1556 33300 CLEARS THE DONE BIT. 
1557 33400 Pitttttttt: 
1558 33500 
1559 006440 000057 33600 8 ATI1?: 57 + TEST NUMBER 
1560 006442 006510 33700 AT20 +NEXT TEST 
1561 006444 000012 33800 10. + ITERATION COUNT 
1562 006446 006450 33900 1$ + SCOPE ENTRY 
1563 006450 032777 001000 172236 34000 = 1%: BIT #LSI11,9SR CHECK FOR LSI-11 
1564 006456 001012 34100 BNE 3$ SKIP TEST IF SET 
1565 006460 012700 000226 34200 MOV #226,R0 
1566 O0646e4 104010 34300 DELAY *DELAY 150 MSEC. 
1567 006466 104021 34400 = 28: AREAD *ENABLE RECEIVER 
1568 006470 105777 172120 34500 TSTB dTKB > REFERENCE eo BUFFER 
1569 006474 105777 172112 34600 TSTB aTKS ; TEST DONE BIT 
1570 006500 100001 34700 BPL 3$ BRANCH iF NOT SET 
1571 006502 104001 34800 ERROR ;DONE BIT IS SET. ERROR 
1572 006504 104005 34900 = 38: CHAIN >CHAIN TO NEXT TEST 
1573 006506 000767 35000 BR 2$ ;REPEAT TEST 
1574 35100 
1575 35200 9 =; KAAKKKKKKK 
1576 35300 *AT20-- TEST#60--CHECK THAT THE RECEIVER DONE BIT IS ABLE TO 
1577 35400 CAUSE AN INTERRUPT. 
1578 35500 Pittttttt st 
1579 35600 
1580 006510 000060 35700 8 AT20: 60 ; TEST NUMBER 
1581 006512 006602 35800 AT21 NEXT TEST 
1582 006514 000012 35900 10. ; ITERATION COUNT 
1583 006516 006544 36000 2$ SCOPE ENTRY 
1584 006520 104003 36100 STRORV ;SET UP RECEIVER INTERRUPT 
1585 006522 006574 36200 4% VECTOR TO 3% 
1586 006524 032777 001000 172162 36300 15%: BIT #LS111,aSR CHECK FOR LSI-11 
1587 006532 001021 36400 BNE 5% SKIP TEST IF SET 
1588 006534 012700 000226 36500 MOV #226,R0 
1589 006540 104010 36600 DELAY ;DELAY 150 MSEC 
1590 006542 104021 36700 AREAD +ENABLE RECEIVER 
1591 006544 005077 172042 36800 =3= 28: CLR aTKS ;DISABLE RECEIVER INTERRUPTS 
1592 006550 005046 36900 CLP - (SP) SET PROCESS STATUS TO ZERO 
1593 006552 012746 006560 37000 MoV #3$.- (SP) 
1594 006556 000002 37100 RT| 
1595 006560 052777 000100 172024 37200 3%: Bis #BiTe,adTKS ENABLE RECEIVER INTERRUPT 
1596 006566 000240 37300 NOP 
1597 006570 104001 37400 ERROR ERR, RECEIVER FAILED TO INTERRUPT 
1598 006572 000401 37500 BR 5$ CHAIN TO NEXT TEST 
1599 006574 022626 37600) = 44S: POPSP2 >OK, CLEAN STACK 
1600 006576 104005 37700 =—s 5S: CARIN >CHAIN TO NEXT TEST 


1601 006600 000761 37800 BP 23 REPEAT TEST 





Mm 5 
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DZLACD. Pil 16-NOV-77 15: 57 1/0 LOGIC TESTS SEQ 0064 

1603 38000); KEXEKEKEKE 
1604 38100 ;AT21i-- TEST#61--TESTS THAT THE RECEIVER DONE DOES NOT CAUSE AN 
1605 38200—S; INTERRUPT WHEN THE PROCESSOR IS AT THE SAME LEVEL AS 
1606 38300 THE RECEIVER'S INTERRUPT REQUEST LEVEL. 
1607 38400 peneeeaent 
1608 38500 
1609 006602 000061 38600 AT21: 61 ; TEST NUMBER 
1610 006604 006702 38700 AT22 ;NEXT TEST 
1611 006606 000012 38800 10. s IYER Oe Count 
1612 006610 006636 38900 23 ; SCOPE ENT 
1613 006612 104003 39000 STRORV ; SET SECE IVER VECTOR TO 4$ 
1614 006614 006674 39100 3 
1615 006616 032777 001000 172070 39200 15%: BIT #LS111,aSR ; CHECK FOR LSI-11 
1616 006624 001017 39300 BNE 4S ;SKIP TEST IF SET 
1617 006626 012700 000226 39400 MOV #226, RO 
1618 006632 104010 39500 DELAY ;DELAY 150 MSEC 
1619 0066274 104021 39600 AREAD ; ENABLE RECEIVER 
1620 006636 005077 171750 39700 = 2: CLR aTKS ;DISABLE RECEIVER INTERRUPTS 
1621 006642 013746 000624 39800 Mov TKLUL, -(SP) ;SET PROCESSOR TO SAME LEVEL AS RECEIVER 
1622 006646 012746 006654 39900 MOV #3%, -(SP) 
1623 006652 000002 40000 RTI 
1624 006654 052777 000100 171730 40100 33%: BIS #BIT6, aTKS ;ENABLE RECEIVER INTERRUPTS 
1625 006662 000240 40200 NOP 

| 1626 006664 005077 171722 40300 «4S: CLR atKs ;O0K, NO INTERRUPT OCCURED 

i; 1627 006670 104005 40400 CHAIN ; CHAIN TO NEXT TEST 
1628 006672 000770 40500 iad 35 >REPEAT TEST 
1629 006674 022626 40600 ~=séSSSS: POPSP2 ERROR, RECEIVER INTERRUPTED. CLEAN STACK 
1630 006676 104001 40700 ERROR 


1631 006700 000771 40800 BR 4§ >BRANCH 39% 
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1633 41000 =; AXXKKKKKKE 

1634 41100 ;AT22-- TEST#62--TESTS THAT THE RECEIVER DONE DOES CAUSE AN 

1635 41200 =; INTERRUPT WHEN THE PROCESSOR IS AT A PRIORITY ONE 

1636 41300 =; LEVEL LOWER THAN THE RECEIVER'S INTERRUPT 

1637 41400 =; REQUEST LEVEL 

1638 41500 =; RXXKKKKKKE 

1639 41600 

1640 006702 000062 41700 8 AT22: 62 + TEST NUMBER 

1641 006704 007010 41800 AT23 +NEXT TEST 

1642 006706 000012 41900 10. ier eee esas 

1643 006710 006736 42000 1$ +SCOPE ENT 

1644 006712 104003 42100 STRORV + SET RECEIVER INTERRUPT 

1645 006714 006776 42200 3$ +VECTOR TO 2% 

1646 006716 032777 001000 171770 42300 BIT #LS111,0SR +CHECK FOR LS!-11 

1647 006724 001025 42400 BNE 4S +SKIP TEST IF SET 

1648 006726 012700 000226 , 42500 MOV #226, R0 

1649 006732 104010 42600 DELAY ‘ ~;DELAY 150 MSEC 

1650 006734 104021 42700 AREAD ENABLE RECEIVER 

1651 00673¢ 005077 171650 42800 1%: CLR aTKS *DISABLE READER INTERRUPTS 

1652 006742 013746 000624 42900 MOV TKLUL, - (SP) SET PROCESSOR ONE LEVEL 

1653 006746 012746 006754 43000 MOV #23, -(SP) 

1654 006752 000002 43100 RTI 

1655 006754 162737 O00040 177776 43200 2%: SUB #40, PSW ;LOWER THAN READERS 

1656 006762 052777 O00100 171622 43300 Bis #B1T6, aTKS 7ENABLE INTERRUPTS 

1657 006770 000240 43400 NOP 

1658 006772 104001 43500 ERROR ;FAILED TO INTERRUPT 

1659 006774 000401 43600 BR 4$ *CHAIN TO NEXT TEST 

1660 006776 022626 43700 89-34: POPSP2 OK, CLEAN STACK 

1661 007000 005077 17le0e 43800 864%: CLR aTKS ;DISABLE RECEIVER INTERRUPTS 

1662 007004 104005 43900 CHAIN >CHAIN TO NEXT TEST 

1662 007006 9000753 44006 BR 1$ ;REPEAT TEST / 


% . 
eave 


2: af 
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1671 007010 
1672 007012 
1673 007014 
1674 007016 
1675 007020 
1676 007026 
1677 007030 
1678 007034 
1679 007036 
1680 007040 
1681 007042 
1682 007044 
1683 007050 
1684 007056 
1685 007060 
1686 007062 
1687 007066 
1688 007070 
1689 907072 
1690 007074 
1691 007102 
1692 007106 
1693 007110 
1694 007112 
1695 007114 
1696 007116 
1697 007120 


000063 
007122 
000012 
007030 
032777 
001015 
012700 
104010 
104021 
104003 
007074 
005077 
052777 
000240 
104001 
0050977 
000005 
104005 
000756 
012777 
012716 
000002 
000240 
006763 
022626 
104001 
000769 


601000 
000226 


171542 
000100 


171524 


007114 
007110 
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171666 


171534 


1715206 
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44200 
44300 
44400 
44500 
44600 
44700 
44800 
44900 
45000 
45100 
45200 
45300 
45400 
45500 
45600 
45700 
45800 
45900 
46000 
46100 
46200 
46300 
46400 
46500 
46600 
46700 
46800 
46900 
47000 
47100 
47200 
47300 
47400 


; XX 


B 6 
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KERKKEE 


;AT23-- TEST#63--CHECKS THAT THE RECEIVER DONE DOES NOT 
REINTERRUPT AFTER RTI INSTRUCTION WHEN DONE 
BIT IS LEFT SET. 


; 


oe 


AT23: 


23: 


3$: 


4S: 
5S. 


¥XKKKEX 


#LS111,aSR 
23 
#226, R0 


aTKS 
#6116. dTKS 
aTKS 


1$ 
#53, aTKUTR 
#45. aSP 


2$ 


2$ 


+ TEST NUMBER 
NEXT TEST 

; ITERATION COUNT 
+ SCOPE ENTRY 
CHECK FOR LSI-11 
+SKIP TEST IF SET 


;DELAY 150 MSEC 

ENABLE RECEIVER 

;SET RECEIVER INTERRUPT 

+ VECTOR TO 3S 

; DISABLE RECEIVER INTERRUPTS 
; ENABLE RECEIVER INTERRUPT 


;NO INTERRUPT, ERROR 

> DISABLE RECEIVER INTERRUPTS 

;RESET AFTER LAST !NTF TEST. 

; CHAIN TO NEXT TEST 

;REPEAT TEST 

; INTERRUPT. OK. CHANGE VECTOR TO 5% 
; CHANGE RET ADDR. TO 4% 

; RETURN 


0K, NO ADDITIONAL INTERRUPTS 
ERROR, ADDITIONAL INTERRUPT 


> CHAIN TC NEXT TEST 


SEQ 0043 
SEQ 0066 


py “ -DZLAC-D 


DZLACD. P 


1699 
1700 
1701 
1702 
1703 
1704 
1705 
1706 
1707 
1708 
1709 
1710 
1711 
1712 
1713 
1714 
1715 
1716 
1717 
1718 
1719 
1720 
1721 
1722 
1723 
1724 
1725 
1726 
1727 
1728 
1729 


007122 
007124 
007126 
007130 
007132 
007140 
007142 
007146 
007150 
007152 
007156 
007164 
007166 
007170 
007172 
007176 
007200 
007204 
007206 
007212 
007214 


007216 
007220 


MACY11 30(1046) 
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000064 
007222 
000001 
007152 
032777 
001426 
005777 
001401 
104001 
012700 
012737 
104000 
014364 
104010 
105777 
100407 
005337 
001403 
012700 
000766 
104001 


104005 
000754 


001000 
171444 


000600 
000030 


171414 
000716 


171554 


N00716 


C 6 
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16-NOV-77 
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47600 «=; RXXKEXKEKE 
47700 
47800 =; 
47900 =; 
48000 =; 
48100 «=; XXXKKKKKKX 
48200 ‘ 
48300 AT24: 64 
48400 AT25 
48500 1 
48600 2$ 
48700 861%: BIT 
8800 BEQ 
48900 TST 
49000 BEQ 
49100 ERROR 
9200 §=2%: MOV 
49300 MOV 
49400 TYPE 
49500 OPMSG 
49600 8 3%: DELAY 
49700 TSTB 
49800 BMI 
49900 DES 
60000 BEG 
50100 MOV 
50200 BR 
50300 «4S: ERROR 
50400 
60500 = 5%: CHAIN 
50600 BP 


KEYBORRD, 


#LS!11,9SR 
5% 


aTKS 
2$ 


#600, RO 
#30, CNTR 


~ wy 
Q@ 0067 
+ AT24--TEST#64--HAVE OPERATOR TYPE A CHARACTER ON THE. 
THEN CKECK FOR RECIEVER DONE 

; ALLOW 12 SECONDS FOR OPERATOR RESPONSE. 

NEXT TEST 

+ ITERATION COUNT 

SCOPE ENTR 

;SKIP TEST IF NOT AN LS!-11 


; TEST NUMBER 


+ SHOULD BE CLEAR 


+RECIEVER are NOT =0 
172 SEC DELAY 
;SET UP FOR 12 SEC WAIT 


;MESSAGE TO TYPE A CHAR 
+172 SECOND 

+CHECK DONE BIT 

>SET - EXIT LOOP 


TIME HAS RUN OUT.. 

ANOTHER 172 SEC ; 
CONTINUE WAIT ie ake 
>NO RECIEVER DONE, OR ; , 
OPERATOR 1S OUT TO LUNCH 

>CHAIN TO NEXT TEST 





MAINDE 
DZLA 


CO 


1721 
1732 
1733 
1734 
1735 
1736 
1737 
1738 
1739 
1740 
1741 
1742 
1743 
1744 
1745 
1746 
174? 
1748 
1749 
1750 
1751 
1752 
1753 


C-11-02 
Pil 


007222 
007224 
‘007226 
007230 
007232 
007240 
007242 
007246 
007250 
007252 
007254 
007256 
007264 
00726€ 
00727 
007272 
007274 
007276 


LAC-D 
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000065 
007300 
000001 
007242 
032777 
001414 
105777 
001001 
104001 
104003 
007272 
052777 
00024C 
000240 
104001 
022626 
104905 
000761 


001000 
171344 


000100 


171454 


171326 
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+ RXKEKEKEEE 


*AT25--TEST#O5-- 


Stitt ttt tt 


AT25: 


23: 


3$: 


4S: 
5S: 


D 6 
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CHECK THAT RECIEVER DONE CAUSES AN INTERRUPT 
WHEN BIT 6 (INTERRUPT ENABLE) IS SET. 


; TEST NUMBER 
;NEXT TEST 

; ITERATION COUNT 
; SCOPE ENTRY 


ieee ;SKIP TEST IF NOT AN LSI-11 
t 
ge ;DONE SHOULD BE SET 


RECIEVER DONE NOT SET 

SET RECIEVER INTERRUPT 

+ VECTOR TO 5% 
#BIT6,@TKS > ENABLE iNTERRUPT 


;RECIEVER DION'T INTERRUPT 
>CLEAN UP THE STACK 
;CHAIN TO NEXT TEST 


SEQ 0045 
SEQ 0068 


as ' 


¥ 


ple ge 11-DZ2LAC-D 
11 


DZLACD. P 


1755 
1756 
175? 
1758 
1759 
1760 
1761 
1762 
1763 
1764 
1765 
1766 
1767 
1768 
1769 
1770 
1771 
1772 
1773 
1774 
1775 
1776 
1777 
1778 
1779 
1780 
1781 
1782 
1783 


007300 
007302 
007304 
007306 
007310 
007316 
007320 
007324 
007326 
007330 
007336 
007342 
007344 
007346 
007350 
007352 
007360 
007362 
007364 
007370 
007372 
007374 
007376 
007400 


16-NOV-77 


000066 
177777 
o0c0001 
007320 
032777 
001422 
105777 
001001 
104001 
017737 
105777 
100001 
104001 
104003 
007374 
052777 
000240 
000240 
005077 
104005 
000752 
104001 
022626 
000771 


MACY11 30(1046) 
15: 57 


001000 
171266 
171260 
171250 


000100 


74:99 
Wizce 


171376 


000716 


171232 


16-NOV-77 
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53200 
53300 
53400 
53500 
53600 
53700 
53800 
53900 
54000 
54100 
54200 
54300 
54400 
54500 
54600 
54700 
54800 
54900 
55000 
55100 
55200 
55300 
55400 
55500 
55600 
55700 
65800 
55900 
56000 


+ RXXEKEKEKE 


E 6 
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+ AT26--TEST#66--CHECK THAT READING TKB CLEARS DONE BIT 
AND THAT DONE CLEARED CON'T CAUSE AN INTERRUPT 


Bittittttt’ 
AT 26: 66 


1$: BIT 
2s: TSTB 


3S: MOV 


4$: STRORV 


5S: CL& 


6$: ERROR 


#LS111,aSR 
5% 


aTKS 
3$ 


aTKB, CNTR 
aTKS 
"5 


#BiTe. aTKS 


aTKS 
2$ 


5$ 


+ TEST NUMBER 

;LAST TEST 

+ ITERATION COUNT 

+ SCOPE ENTRY 

+SKIP TEST IF NOT AN LSI-11 


+MAKE SHURE DONE IS STILL SET 


RECIEVER DONE NOT SET 
READ DATA BUFFER 
+ CHECK THE DONE BIT 


+ OK 
; DEAD ING DATA REG DIDN'T CLEAR DONE 
;SET RECIEVER INTERRUPT 
+ VECTOR TO 6% 
> ENABLE INTERRUPT 


*OK- CLEAN UP 
EXIT TESTS 


;DLV INTERRUPTED WITH DONE CLEAR 
>CLEAN UP THE STACK 


-—— 


SEQ 0046 
SEQ 0069 


MAINDEC-11-DZ2LAC-D 
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OZLACD. P11 16-NOV-77 15: 57 170 LOGIC TESTS 


1725 








EQ 0047 
SEQ 0070 


MAINDEC-11-DZ2LAC-0 
ZLaACcD. P11 


“ 
fen Co egrag- 


ooc: 


Diestveons 4 


802 


MACY11 30(1046) 
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900000 
007456 
104016 
104007 
014112 
012703 
012702 
010300 
013701 
104015 
000300 
005301 
001374 
000303 
104012 
005302 
001365 
104095 
000757 


025125 
000004 


000052 


16-NOV-77 16:02 PAGE 4 
LA36 PRINTER TESTS 


04000 
04100 
04200 
04300 
34400 


.SBTTL LA36 PRINTER TESTS 


+ THE LAI6 PRINTER TESTS WILL BE EXECUTED IN A 
CONTINOUS LOOP OUTPUTTING TO ALL MULTIPLE CL11'S 
+1F SR BIT 8 1S SET TO ZERO AT START UP TIME. IF 
‘BIT 8 1S SET TO 1 AT START UP THEY MAY BE EXECUTED 
+ INDIVIDUALLY ONCE OR CONTINUALLY LOOPED. OR 
*;BECOME THE FIRST OF THE ENTIRE SEQUENCE OF PRINTER 
TESTS. REFERENCE INTRUCTIONS IN THE INTRODUCTION 
;FOR PROPER MODE OF OPERATION 


2 KINA 
‘PTO -- DATA PATH TEST---FOUR LINES OF ALTERNATING 


“*" AND “U" ARE PRINTED. OUT TO THE GIVEN PAPEP 


WIDTH. THE PATTERN WILL APPEAR AS FOLLONS. 


KURUSURURUSU 
USURURUSUKUS 
RURURUSURUTU - 
U*USURUSUSUS 


MWK XKNKKAK 


PTO. 0 > TEST NUMBER 
PT) NEXT TEST 
PRTHOR ; 
TYPEM >PRPINT COLUMN # MESG 
HORO 
1$ MOV #"Ut. RS >SET FIRST CHAR PRIF 
Mov #4,R2 >SET LINE COUNT 
2s MoV P3.R0 -SET CHAR PAIR 
MOU WITH. P4 >SET COLUMN COUNT 
2% PRINTC -PRINT CHAR 
SWAB P0 ‘SET NEXT CHAR 
DEC Pt >DEC COLUMN COUNT 
BNE 35 >FINISH LINE 
SWAB R= SET NEXT LINE STAPT CHAP 
CRLF :SEND CR-LF 
DEC Re -DEC LINE COUNT 
BNE 2$ >FINISH TEST 
CHRIN ALL DONE. EXIT 
EF 1$ PEPEAT TEST 





SEQ 0048 
SEQ 0071 


| 






























DILACD 


MA INDE 





€-11-02 
Pit 


007456 
007460 
007462 


LAC-D 





at y 30(1046) 
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000001 
007600 
104016 
012701 
012702 
012703 
110100 
004737 
110200 
004737 
012704 
110300 
104015 
0052304 
001375 
104912 
122122 
105723 
020327 
103756 
104005 
000746 
012704 
104015 
005304 
001375 
012700 
104015 
012700 
104015 
900207 


000040 
000100 
000140 
007550 


007550 
000002 


H00200 


000003 


000040 
000040 


H 
16-NOV-77 16:02 PAGE 4-1 
LA36 PRINTER TESTS 


O4600 =| XXXXXXXXXX 


04800: PTI -- PRINTER CHARACTER TEST --- PRINTS ALL PRINTABLE CHARACTERS 


04700 

04900 =; 

05000 + XXXXXXXXKX 

05100 

05200 =PT1: 1 

05300 PT2 

05400 PRTHOR 

05500 1% MOV #40,R1 
05600 MOV #100,R2 
05700 MOV #140,R3 
05800 82: MOVB R1i,RO 
05960 JSR PC, SPSP 
06000 MOVB R2.R0 
06100 JSP PC. SPSP 
06200 MOV #3.R4 
06300 MOVB R3,R0 
06400 3% PRINTC 

06500 DEC by 
06600 BNE 3$ 
06700 CRLF 

06800 CMPB (P1)+, (P24 
06900 TSTB tR3)+ 
67000 CMP R32. 8200 
07100 BLO 2$ 
07200 CHAIN 

07300 BR 1$ 
07400 = SP SP: MoV #3, R46 
07500 1% PRINT 

07600 DEC RY 
07706 BNE 1$ 
07800 8 SP2. MoV #40.P0 
07900 PRINTC 

oscoo SPC Mow #40. FC 
08100 PRINTC 

08200 PTS Pi 


+ TEST NUMBER 
;NEXT TEST 

+ SPACE TO R1 

;@ TO R2 

+ TO RZ 

CHAR TO RO 

+SEND TWO SPACES 
+NEXT CHAR TO RO 
+SEND TWO SPACES 
PRINT COUNT TO RY 
+ THIRD CHAR TO PO 
PRINT THE CHAR 


> THREE TIMES ? 
BRANCH IF NOT 


, 


CARRIAGE RETURN LINE FEED 


NEXT CHARACTERS 


> CHECK IF ALL DONE 
;BRANCH IF NOT 


;EXIT TO NEXT TEST 


REPEAT TEST 
>PRINT COUNT TO P4 
>PRINT CHAR 

>; THREE TIMES? 
>BRANCH IF NOT 

> SPACE TO RO 

» SEND A SPACE 
-SPACE TO RQ 

> SEND ANOTHEP 
>PETUPN 


SEQ 0049 
SEQ 0072 


[ee 


MAINDEC-11-DZ2LAC-D 
DILACD. P11 


1915 


1916 


007600 
007602 
007604 
007606 
007612 
007616 
007622 
007626 
007632 
007634 
007636 
007640 
007642 
007644 
007646 
007652 
007654 
007656 
007660 
007662 
007664 
007670 
007672 
007674 
007676 
007700 
007702 
007704 


007706 
007714 
007722 
007726 
007734 
007742 
007750 
007756 
007764 
007772 
010000 
010006 


16-NOV-77 


000002 
010164 
104016 
012701 
012703 
012702 
012704 
121327 
001422 
112100 
104015 
005304 
001371 
112300 
012704 
104015 
005304 
001375 
005302 
001404 
004737 
104015 
000753 
104012 
000747 
104012 
104005 
000740 


030060 
046125 
051440 
030060 
045503 
042040 
020061 
031060 
031103 
04204 

02006 

031060 


MACY11 30(1046) 
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007706 
010137 
000003 
000C10 
900055 


000003 


007562 


020060 
030060 
054124 
020066 
031060 
042514 
042040 
020062 
031060 
031503 
042040 
020065 


047040 
020062 


040440 
020060 
031060 
030503 
042040 
020063 
031060 
032103 
047040 


| 6 
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;PTZ -= NON-PRINTING CHARACTER TEST. THIS TEST 

PRINTS THE OCTAL CODE FOLLOWED BY THE MNEMONIC 

OF ALL NON-PRINTING CHARACTERS. FOLLOWING EACH 
MNEMONIC, THE PRINTER IS DRIVEN BY THE NON-PRINTING 
CODE (000 THROUGH 037 PLUS 177) 

ALL CONTROL CHARACTERS (INCLUDING THOSE FOR OPTIONS 


WILL BE SKIPPED, REFER TO THE DOCUMENT FOR A LIST OF THOSE 


16-NOV-77 
LA36 PRINTER TESTS 
08400 + AXXXXXXXXX 
08500 
08600 
08700-~=—C; 
ossoo—C; 
0s900_~—C; 
09000 _:~=C 
09100 =; 
09200_:~—=C: 
09300: =; TESTED 
09400 SC; 
09500 ;XXXXXXXXXxX 
09600_-~—C; 
09700 = PT2: 2 
09800 PT3 
09900 PRTHDR 
10000 $15: MoV 
10100 MoV 
10200 =23: Mov 
10300 3%: MoV 
10400 4S: CNPB 
10500 BEQ 
10600 MOVB 
10700 PRINTC 
10800 DEC 
10900 BNE 
11000 MOvVB 
11100 MoV 
11200 = 58: PRINTC 
11300 DEC 
11400 BNE 
11500 DEC 
11600 BEQ 
11700 JSR 
11800 PRINTC 
11900 BR 
12000 ~—s«éb SS: CRLF 
12100 BP 
12200 «7S. CRLF 
12300 CHAIN 
12400 BR 
12500 

12600 

12700 

12800 IDEZ ASCII 
12900 ASCH 
13000 ASCII 
13100 RASCH 


#IDEZ,R1 
#NPCODE.R3 


#3,R2 
#10, R4 


(R3), #55 


7$ 


(R1)+,R0 


PC, SPZ 


/022 


025 


NULOOZ 


ACKO20 


OC 2023 


NAR O26 


> TEST NUMBER 

;NEXT TEST 

;PRINT TEST HEADER 

;ADDR OF IDENT TO R1 

;ADOR OF NON-PRINT-CODES TO R3 
;NO. OF ID'S PER LINE TO R2 
;NO. OF CHARS PER ID TO RY 
; ZERO TERMINATOR IN NP TABLE?? 
;BRANCH IF YES 

;GET 1D CHARACTERS 

;AND PRINT A 

> GROUP OF 

;8 CHARACTERS 

;GET NP CODE FROM TABLE 

; AND 

>; TRY TO PRINT IT 

>; THREE 

> TIMES 

;MORE TO GO ON THIS LINE ? 
:>BRANCH !F NO 

>SEND 3 SPACES 

;BRANCH TC CONTINUE LINE 
:GO OO NEXT LINE 


:CHRIN TO NEXT TEST 


STs 
OLEQ2! C¢1 
Oc3024 Och 
SYNOI? ETB” 


SEQ 0050 


SEQ 0073 | 


eS SD 


MAINDEC-11-DZ2LAC-D 
DZLACD. P11 


1917 


1918 





010014 
010022 
010030 
010036 
010044 
010052 
010060 
010066 
010074 
010102 
010110 
010116 
010124 
010132 
010137 
010142 
O1O14s 
010147 
010152 
010156 
010157 
O10le2 


16-NOV-77 


045501 
051440 
020067 
031460 
047101 
042440 
020062 


MACY11 30(1046) 
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031060 
047131 
042440 
020060 
031460 
020115 
051440 
020064 





020066 
031060 


J 
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13200 


13300 


13400 


13500 


13600 


13700 
13800 


NPCODE: 





ASCII 


ASCII 


ASCII 


BYTE 


BYTE 


BYTE 
EVEN 


6 


7030 CANC31 EM 032 SUB/ 


7034 FS 025 GS 036 RS / 


7037 US 177 DEL 7 


0, 2,6, 20,21, 22, 23, 24 


25, 25. 27, 30. 31. 32, 34, 35 


36. 37,177.55 





SEQ 0051 
SEQ 0074 


| 
| 
























DZLACD 


ys ple ee 


010164 
010166 
010170 
010172 
01017€ 
010202 
010206 
010210 
010212 
010214 
010220 
010222 
010224 
010226 
010234 
010240 
010244 
010246 
010250 
010254 
010256 
010260 
010266 
010274 
010276 
010300 
010302 





000003 
010304 
104016 
005037 
013701 
012700 
104015 
005301 
001404 
004737 
005301 
001367 
104022 
012737 
013701 
004737 
005301 
001374 
012700 
104015 
104022 
062737 
023737 
103757 
104014 
104005 
000733 





000674 
000«52 
000117 


007570 


006001 
000674 
007570 


000130 


000002 
000674 


MACY11 3001046) 
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000674 
000652 


16-NOV-77 
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LA36 PRINTER TESTS 
+ XXXXXXXXXK 


:PT3 -- CARRIAGE RETURN TEST 


’ 
, 
, 
’ 
; 
; 
A 
’ 
, 
, 


PT3: 


1S: 
2$ 


43S 
5$ 


THE LINE CONSISTS OF A STRING OF O'S AND 


X'S. 


CARR | AGE 


FIRST, 
COLUMN WITH A SPACE SEPARATING EACH. 
1S SPACED TO THE FIRST BLANK SPACE. 
1S PRINTED AND THEN RETURNED TO THE MARGIN 


THE O'S ARE PRINTED OUT TO THE LAST 


THEN THE 


PROCESS IS CONTINUE UNTIL ALL SPACES BETWEEN 
THE ZEROES HAVE BEEN FILLED 


+ XXXXXXXXXX 


PC, SPC 
R1 

28 

#1, SPCNT 


#2. SPCNT 


SPCNT. WIDTH 


4S 


1$ 


+ TEST NUMBER 
NEXT TEST 
; TYPE HEADER 
+CLEAR SPACE COUNTER 
>POSITION COUNTER TO R1 
-"0O" TO RO 

PRINT THE "O" 

;DECREMENT POSITION COUNTER 
BRANCH IF 0 

; SEND SPACE 

;DECREMENT POSITION COUNTER 
BRANCH IF NOT ZERO 

SEND A CR 

SPACE. COUNTER SET TO 1 
NO. OF SPACES TO Ri 

SEND SPACE 

>DECREMENT SPACE COUNTER 
>BRANCH IF NOT ZERO 

>"X" INTO RO 

>PRINT “X" 

>PRINT CR 

+ INCREMENT SPACE COUNT BY 2 
> COMPARE POSITION COUNTER WITH COLM. 
BRANCH IF LOWER 

» SEND LF 

>CHAIN TO NEXT TEST 

REPEAT TEST 


SEQ 0052 
SEQ 0075 


COUNT 


L 6 
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DZLACD. P11 16-NOV-77 15:57 LA36 PRINTER TESTS SEQ 0076 
1967 18200 + AXXXXXXXKK 
1968 18300 
1969 18400 ;PTH -- MULTIPLE LINE FEED TEST -- 63 LINE FEEDS ARE 
1970 18500; SENT WITH A REFERENCE LINE AT THE START AND END. , 
1971 18600 ; A NUMBER 1S PRINTED WHICH INDICATES THE NUMBER OF LINE 
1972 18700; FEEDS THAT WILL BE ISSUED BEFORE THE NEXT . 
1973 18800 =; NUMBER OR REFERENCE LINE IS PRINTED. 
1974 18900; 
1975 19000 = + XXXXXXXXXxX 
1976 19100 ' 
1977 010304 000004 19200 = PT4: 4 + TEST NUMBER 
1978 010306 010462 19300 PTS NEXT TEST 
1979 010310 104016 19400 PRTHOR + TYPE HEADER 
1980 010312 012737 000001 000706 19500 15%: MOV #1,LFCNT +LINE FEED COUNT TO 1 
1981 010320 013701 000652 19600 MOV WIDTH, R1 +COLUMN COUNT TO R1 
1982 010324 012702 010444 19700 MOV #LINE3,R2 ;ADOR OF NUMBER FIELD TO R2 
19383 010330 004737 010414 19800 JSR PC, REF +PRINT REFERENCE LINE 
1984 010334 013701 000706 19900 2%: MoV LFCNT.R1 +LINE FEED COUNT TO R1 
1985 010340 104014 20000 _—=sés‘« 38: LF + SEND LF 
1986 010342 005301 20100 DEC R1 +DECREMENT COUNTER 
1987 010344 001375 20200 BNE 3$ ;BRANCH IF NOT YET 0 
1988 010346 006337 000706 20300 ASL LFCNT ;DOUBLE LINE FEED COUNT 
1989 010352 022737 000100 000706 20400 CMP #B1T6,LFCNT TEST IF COUNT IS 32 
1990 010360 001406 20500 BEQ 4$ ;BRANCH IF =32, END 
1991 010362 112200 20600 MOVB (R2)+,RO NUMBER TO RO 
1992 010364 104015 20700 PRINTC ;PRINT IT 
1993 010366 112200 20800 MOVB (R2)+, RO ;NUMBER TO RO 
1994 010370 104015 20900 PRINTC *PRINT IT 
1995 010372 104022 21000 CR +PRINT CR 
1996 010374 000757 21100 BR 2$ DRIVE THE LINEFEEDS 
1997 010376 013701 000652 21200 «4S: MoV WIDTH. R1 +COLUMN COUNT TO R1 
1998 010402 004737 010414 21300 JSR PC. REF SEND END REFERENCE LINE 
1999 010406 104014 21400 LF : ADVANCE PAPER 
2000 010410 104005 21500 CHAIN 
2001 010412 000737 21600 BR 1$ REPEAT TEST 
2002 010414 112200 21700 REF: MOVB (R2)+,P0 >NUMBER TO RO 
2003 010416 104015 21800 PRINTC ;PRINT IT 
2004 010420 112200 21900 MOVB (RZ)+.R0 ;NUMBER TO RO 
2005 010422 104015 22000 PRINTC *PRINT IT 
2006 010424 005741 22100 TST -(R1) DECREASE COUNTER BY 2 
2007 010426 012700 000137 22200 MoV #137,R0 DASH (-) TO RO 
2008 010432 104015 22300 861%: PRINTC *PRINT IT 
2009 010434 005391 22400 DEC Ri *DECREMENT COLUMN COUNTER 
2010 010436 001375 22500 BNE 1$ >BRANCH IF NO ZERO 
2011 010440 104022 22600 CF ;PRINT CR 
2012 010442 000207 22700 RTS PC > RETURN 
2013 22800 


2014 ©10444 030460 031060 032060 22900 LINE?: .ASCI! 201020408163200/ 
010452 034060 033061 031063 
010460 030060 


MAINDEC-11-DZ2LAC-D 
DZLACD. P11 


. 





010462 
010464 
010466 
010470 
010474 
010476 
010502 
010504 
010506 
010510 
010514 
010516 
010520 
010526 
010530 
010534 
010536 
010540 
010544 
010550 
010552 
010554 
010556 
010560 
010564 
010570 
010572 
010574 
010576 
010600 
010602 
010606 
010610 
010614 
010616 
010622 
010624 
010626 
010630 
010634 


"010640 


010642 
010644 
010646 
010650 
010654 
010656 
010662 
010664 


16-NOV-77 


000005 
010666 
104016 
013701 
005741 
012700 
104015 
O0£301 


MACY11 30(1046) 
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000652 
000060 


000062 


000652 


002410 


000063 
000100 


000652 
0001 34 


010630 
001750 
010630 


000652 
000061 


000071 
000060 





000204 
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23100 =+ XXXXXXXXXX 
23200 =; PTS-- SINGLE LINE FEED TEST -- TESTS THE LINE FEED 
23300 =; CAPABILITY FROM ALL COLUMNS. 
23400 + XXXXXXXXXX 

23500 
23600 =—PTS: 5 + TEST NUMBER 
23700 PT6 +NEXT TEST 
23800 PRTHOR + TYPE HEADER 
23900 =:1$: MOV WIOTH, R1 +COLUMN COUNT TO R1 
24000 TST ~(P1) ;DECREASE BY 2 
2410G MoV #60, RO *'O" TO RO 

24200 82S: PRINTC + SEND O 

24300 DEC R1 +DECREMENT COLUMN COUNTER 
24400 BNE 2$ +BRANCH IF NOT ZERO 
24500 MoV #62, R0 SEND A 2 

24600 PRINTC 

4700 PRINTC + SEND A SECOND TWO 
24800 CMP WIDTH, #132. COMPARE COLUMN COUNT 
4900 BEQ 3$ *+BRANCH IF EQ 132 
25000 MOV #3410, R0 DELAY 1.8 SEC 

25100 DELAY 

25200 BR 5% 

25300 3= 38: MOV #63.P0 :3'S TO RO 

25400 Moy #100,R1 +64 TO COUNTER 

25500 34S: PRIiNTC SEND CHARACTER 

25600 DEC R1 ;DECREMENT COUNT 
25700 BNE 4$ BRANCH !F NOT ZERO 
25800 _ =s 58: CRLF SEND A CR.LF 

25900 MoV WIDTH, R1 NO. COLUMNS TO R1 
26000 _—=sés«€0@S:: MOV #134,R0 +BACKSLASH TO RO 
26100 PRINTC *SEND IT 

26200 LF ;PRINT LF 

26300 DEC R1 *DECREMENT COUNTER 
26400 BNE 6$ >BRANCH IF NOT ZERO 
26500 CR + SEND CR 

26600 JSR PC, PTSAL +SEND REF LINE #1 
26700 CRLF >SEND A CR.LF 

26800 MoV #1750.R0 +DELAY 1 SEC 

26900 DELAY 

27000 JSR PC, PTSAL >SEND A SECOND REF. LINE 
27100 CRLF SEND A CR.LF 

27200 CHAIN CHAIN TO NEXT TEST 
27300 BR REPEAT TEST 

27400 PTSAL: MOV WIDTH, R14 COLUMN COUNT TO R1 
27500 MOV #61,R0 -"1" TO RO 

27600 ~=s:'118: PRINTC >PRINT RO 

27700 Occ R1 *DECREMENT COUNTER 
27800 BEQ 23 +BRANCH IF=0 

27900 INC RO ; INCREMENT CHARACTER 
28000 CMP RO, #71 COMP CHAR TO "9" 
28100 BLOS 1$ BRANCH IF LOWER OR SAME 
28200 MOV #60, RO ;RESET CHAR TO “O" 
28300 BR 1$ + CONTINUE 

28400 82% RTS PC >FINISHED, RETURN TO CALLER 


SEQ 0054 | 
SEQ 0077 





MAINDEC-11-DZLAC-D 


DZLACD. 


2071 
2072 
2073 
2074 


Pil 


010666 
010670 


MACY11 30(1046) 
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000006 
011054 
104016 
104007 
014112 
013701 
005741 
012700 
104015 
005301 
001375 
012700 
104015 
104015 
023727 
00:404 
012700 
104019 
000407 
012700 
012701 
104015 
005301 
001375 
104012 
013701 
012700 
104015 

12700 
104015 
012700 
104015 
005301 
001365 
104014 
104022 
004737 
104012 
012700 
104010 
004737 
104012 
104005 
000712 


000652 
000060 


000062 


000052 


003410 


000063 
000100 


000652 
000134 


000010 
000057 


010630 
001750 
010630 


000204 


16-NOV-77 
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CE TEST -- A REFERENCE LINE SUCH AS IN 


THE SECOND LINE CONSISTS 


BACKSPACE AND FORWARD 


SLASH COMBINATION OUT TO THE GIVEN COLUMN WIDTH. 
THIS LINE 1S THEN FOLLOWED BY THE SAME TWO REFERENCE 


+ TEST NUMBER 

+NEXT TEST 

PRINT HEADER 

PRINT COLUMN # MESG 


COLUMN COUNT TO R1 
;DECREMENT BY 2 

*"0" TO RO 

SEND 0 

+DECREMENT COLUMN COUNTER 
BRANCH IF NOT'.ZERO 

:"2" TO RO 


+SEND A SECOND "2" 
+ COMPARE COLUMN COUNT 


DELAY 1.8 SEC 


*3'°S TO RO 

+64 TO CHAR COUNT 
SEND CHAR 

;DECREMENT CHAR COUNT 
CONTINUE IF NOT DONE 
+ SEND A CR-LF 

COLUMN COUNT TO R1 
;BACKSLASH TO RO 
*+SEND IT 

;BACKSPACE TO RO 
SEND IT 

ForworD SLASH TO RO 
> SEND 


; END oF PAPER 
BRANCH IF NO 

; SEND LF 

SEND CR 

SEND REF LINE #1 
+SEND A CR-LF 
‘DELAY 1 SEC 


SEND SECOND REF LINE 
SEND A CRLF 
>CHAIN TO NEXT TEST 


LA36 PRINTER TESTS 

ogee + XXXXXXXXXX 

28700 ;PT6é-- BACKSPA 

28800 =O; TEST PTS IS PRINTED. 
28900 =; OF PRINTING A BACKSLASH, 
29000: =O; 

29100 =; 

29200 =; LINES AS PRINTED IN TEST PTS. 
29300 * KHIR 

29400 

29500 «= PTé: 6 

29600 PT? 

29700 PRTHOR 

29800 TYPEM 

29900 HORO 

30000 1%: Mov WIDTH, R1 
30100 TST -(R1) 
30200 MoV #60,R0 
30300 23: PRINTC 

30400 DEC R1 

30500 BNE 25 

30600 MOV #62,R0 
30700 PRINTC 

30800 PRINTC 

30900 cre WIOTH, #132. 
31000 BEG 35 

31100 MOV #35410,R0 
31200 DELAY 

31300 BR 55 

31400 38: MOV #63,R0 
31500 MOV #100.R1 
31600 4s: PRINTC 

31700 DEC R1 

31800 BNE 4% 

31900 5S: CRLF 

32000 MoV WIDTH, R1 
32100 6S: MOV #134,R0 
32200 PRINTC 

32300 MoV #10,R0 
32400 PRINTC 

32500 MOV #57,R0 
32600 PRINTC 

32700 DEC Ri 

32800 BNE 6S 

32900 _ LF 

33000 CR 

33100 JSR PC. PTSAL 
33200 CRLF 

33300 MoV #1750.R0 
33400 DELAY 

33500 JSP PC, PTSAL 
33600 CRLF 

33700 CHAIN 

23800 BR 1$ 


>REPEAT TEST 


SEQ 0055 
SEQ 0078 


Le. 





8 7 
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ak ie 11-DZ2LAC-D MACY11 30(1046) 16-NOV-77 SEQ 0056 
DZLACD. P11 16-NOV-77 15:57 LA36 PRINTER TESTS SEQ 0079 
2125 34000 = + XXXXXXXXXX 
2126 34100; 
2127 34200 «=; PT7-- OQVERPRINT TEST-- A ROW OF ALTERNATING M'S AND 
212 34300 =: SPACES ARE PRINTED, OUT TO THE LAST COLUMN AND OVERPRINTED TWICE. 
2129 34400 =; A SECOND LINE OF ALTERNATING SPACES AND “d'S" IS THEN 
2130 34500; SENT 3 TIMES AS THE FIRST LINE. THIS IS FOLLOWED 
2131 34600 =; BY A THIRD AND FINAL LINE OF ALTERNATING '8' 
2132 34700; AND SPACES. 
2133 34800 =; 
2134 34900 =; XXXXXXXXXX 
2135 35000 
2136 011054 000007 35100 + PT?: ? + TEST NUMBER 
2137 011056 011266 35200 PT10 +NEXT TEST 
2138 011060 104016 35300 PRTHDR PRINT MESSAGE 
2139 011062 012703 000002 35400 = 1%: MOV #2,R3 +Z COUNT TO R3 
2140 011066 013701 000652 35500 8 2%: MoV WICTH, R1 +NO. OF COLUMNS TO R1 
2141 011072 012700 000115 35600 3835: MOV #115,R0 ;“M" TO RO 
2142 011076 104015 35700 PRINTC SEND IT 
2143 011100 005301 35800 DEC R1 >END OF LINE 
2144 011102 001404 35900 BEG 4% *BRANCH iF YES 
2145 011104 004737 007570 360006 JSR PC, SPC + SEND SPACE 
2i46 611110 005301 36100 DEC R1 *END OF LINE? 
2147 011112 001367 36200 BNE 3$ BRANCH IF NO 
2148 011114 022703 900002 36300 8644S: cne #2,R3 7 TEST R3 
2149 011120 001003 36400 BNE 6$ *>BRANCH IF NOT FIRST TIME 
2150 011122 104022 36500 _ =s 58: CR SEND CR 
2151 011124 005303 36600 DEC R3 DECREASE LINE COUNTER 
2152 011126 000757 36700 BR 2$ REPEAT L!NE 
2153 011130 005703 36800 =—s 6S: TST R3 + THIRD TIME? 
2154 011132 001373 36900 BNE 5$ BRANCH IF NOT 
2155 011134 104012 37000 CRLF ;NEXT LINE 
2156 011136 005723 37100 TST (R3)+ REPEAT COUNTER TO RS 
2157 011140 013701 000652 37200 38 7S: Mov WIDTH, R1 ;COLUMN COUNT TO R1 
2158 011144 004737 007570 37300 = 8: JSR PC, SPC > SEND SPACE 
2159 011150 005301 37400 DEC R1 *DECREASE COLUMN COUNT 
2160 011152 001405 37500 BEQ 9% ;BRANCH IF OQ. END OF LINE 
2161 011154 012700 900100 37600 MOV #100,P0 "a" TO RO 
2162 011160 104015 37700 PR INTC SEND IT 
2163 011162 005301 37800 DEC RI »DECREASE COLUMN COUNT 
2164 011164 001367 37900 BNE 8$ BRANCH IF NOT 0 (NOT END) 
2165 011166 022703 000002 38000 86 9S: CMP #2,R3 -END OF LINE. FIRST TIME? 
2166 011172 001003 38100 BNE 11$ BRANCH IF NOT 
2167 011174 104022 38200 =: 1108: CR + SEND CR 
2168 011176 005303 38300 DEC R3 DECREASE LINE COUNTER 
2169 011200 000757 38400 BP 7$ +REPEAT LINE 
2170 ©11202 005703 38500 38118: TST R3 > TEST IF THIRD REPEAT 
2171 011204 001373 38600 BNE 10% *BRANCH IF NOT 
2172 011206 104012 38700 CRLF +00 NEXT LINE 
2173 011210 005723 38800 TST (R3)+ >LINE REPEAT COUNTER TO R3 
2174 011212 013701 000652 38900 3=—: 1128: MOV WIDTH. R1 >COLUMN COUNT TO R1 
2176 011216 012700 O0004%6 39000 3=:113$: MoV #46,R0 -"&" TO RO 
2176 011222 104015 39100 PRINTC *SEND IT 
2177 011224 005301 39200 C 1 *DECREASE COLUMN COUNT 
2178 39300 
2179 011226 001404 39400 BEQ 14$ >BRANCH IF END 
2180 011230 004737 007570 39500 JSR PC. SPC > SEND SPACE 





= oe 
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DZLACD. P11 


011224 
011236 
011240 
011244 
011246 
011250 
011252 
011254 
011256 
011260 
011262 
011264 
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16-NOV-77 15:57 


005301 


000676 


000002 


16-NOV-77 


LA36 PRINTER TESTS 


14S: 
15%: 


16$: 


SS. 
16:02 PAGE 4-9 


;DECREASE COLUMN COUNT 

; BRANCH IF NOT END 

; TEST IF FIRST TIME 
;BRANCH IF =2, FIRST TIME 
;SENT CR 

;DECREASE REPEAT COUNTER 
;PRINT LINE AGAIN 

; TEST IF END, R3=0 
;BRANCH IF NOT END 

> SEND CR.LF 

; CHAIN TO NEXT TEST 
;REPEAT TEST 


SEQ 0057 
SEQ 0080 


ACD P 


011266 
011270 
011272 
011274 
011300 
011304 
011312 
011316 
011320 
011224 
011326 
011330 
011332 
011334 
011336 
011342 
011344 
011346 
011350 
011352 
011354 
011356 
011360 
011362 
011364 
011370 
011372 
011376 
011400 
011404 
011406 
011410 
011414 
011416 
011420 
011422 


ety 11-DZ2LAC-D 
D2L 11 


16-NOV-77 


000010 
011424 
104016 
012701 
012702 
012737 
012700 
104015 
012700 
104010 
005301 
001426 
005302 
001430 
013704 
006204 
006204 
006204 
006204 
010405 
006204 
006204 
006204 
060405 
022702 
003403 
160537 
000745 
060537 
000742 
104012 
012701 
000746 
104012 
104005 
000724 


MACY11 301046) 


15: 57 


000036 
000170 
000036 
000110 


000036 


O1i3c2 


000074 
011322 
011322 


000036 


011322 


16-NOV-77 
LA36 PRINTER TESTS 
40900 + AXXXXXXXKX 
41000 
41100 
41200 =; 
41300 =; "H" A 3 
41400 =; 
41500 =; 
41600; 
41700 =; 
41800 =; 
41900; 
42000 +XXXXXXXXXX 
42100 
42200 = PT10: 10 
42300 PT11 
42400 PRTHOR 
42500 18: MOV 
42600 MoV 
42700 MOV 
42800 2%: MOV 
42900 PRINTC 
43000 8634: MoV 
43100 DELAY 
43200 DE“ 
43300 BEQ 
43400 84S: DEC 
43500 BEQ 
43600 MoV 
43700 ASR 
43800 ASR 
43900 ASR 
44000 ASR 
44100 MOV 
44 200 ASR 
44300 ASR 
44400 ASR 
44500 ADD 
44600 CMF 
44700 BLE 
44800 SUB 
44900 BR 
45000 =5%: ADC 
45100 BR 
45200 =6S: CRLF 
45300 MoV 
45400 BR 
45500 +=7% CRLF 
45600 CHAIN 
46700 BR 


D7? 
16:02 PAGE 4-10 


;PT10-- os eae s FREQUENCY TEST-- 120 H'S ARE PRINTED ON 4 LINES 


PER LINE. THE TEST IS SUCH THAT BETWEEN THE FIRST AND SECOND 
C DELAY IS INTRODUCED. THIS DELAY IS THEN INCREASED 


O MSE 
BETWEEN CHARACTERS OUT TO 60 CHARACTERS IN AN EXPONENTIAL 


MANNER. THE DELAY IS THEN DECREASED IN THE SAME MANNER OUT TO THE 


120TH CHARACTER. THIS DELAY IS CALCULATED AS FOLLOWS; 


NEW DELAY = 


#36,R1 
#120. ,R2 
#30. , 3$+2 
#110,R0 


OLD DELAY + OR - 


+ TEST NUMBER 
NEXT TEST 


+ TYPE MESSAGE 


SET R1=30 


(OLD DELAY/16 + OLD DELAY/128 ) 


SET CHAR COUNT = 120 
+SET UP — VALUE 


-"H" TO 
SEND IT 


> DELAY 
;DEC. COUNT OF CHARS PER LINE 


BRANCH IF OQ, 


END OF LINE 


;DECREMENT CHAR COUNTER 
BRANCH !F END 
GET OLD DELAY 
>CAL 1/16 OF OLD DELAY 


>SAVE 1716 IN RS 
;CAL 17128 OF OLD DELAY 


71716 417128 TO R5 


> TEST WHICH HALF OF THE 120 CHARS 


-BRANCH IF LT OR EQ 60 
>GT 51, DECREASE DELAY BY 34 MEC 
GO PRINT AGAIN 


*LT HALF WAY, 


ADC DELAY OF 34 MEC. 


>GO PRINT AGAIN 


; SEND CRLF 
»SET R1=30 


> SEND CR,LF 


>CHAIN TO NEXT TEST 


/REPEAT TEST 


ERNIE 
SEQ 0058 
SEQ 0081 


MAINDEC-11-DZ2LAC-0 
16-NOV-77 15:57 


DZLACD. P11 


011424 
011426 
011430 
011432 
2257 011436 
011442 
011444 
011446 
011450 
011452 
011454 


011456 
011460 
011462 
011464 
011470 
011474 
011476 
011500 
011502 
011504 
011510 
011512 
011516 
011520 
011522 
011524 
011526 
011530 
011532 
011534 


000011 
011456 


000012 
007402 
104016 
012701 
012700 
104015 
005301 
001375 
104014 
012700 
104010 
013700 
001405 
000240 
004710 
000240 
000240 
000240 
104005 
000753 


MACY11 30(1046) 


000030 
000130. 


000010 
000007 


003720 
000042 


16-NOV-77 


LA36 PRINTER TESTS 
# AXXXXXXXXX 


, 


, 


—E ? 
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4 LINES) DOWN THE LEFT MARGIN OF THE P 


VISUALLY CHECK THE RIBBON FEED MECHANISM FOR PROPER OPERATION. 


| XXXXXXXXKX 


PT11: 


15: 
23: 


11 
PT12 


7 MMAXAAKXAN 
:PTI2-- PRINTER BELL TEST-- THE LAST TEST IN THE 


PRINTER TEST SEQUENCE. 


#30.R1 
#130,R0 


Ri 
2$ 


1$ 


+ TEST NUMBER 
NEXT TEST 

+ TYPE MESSAGE 
>SET R1=24(10), 
SET CHAR = X 
*PRINT X 

+ SEND CR-LF 
+DECREMENT LINE COUNT 
CONTINUE IF NOT DONE TEST 
>CHAIN TO NEXT TEST 
REPEAT TEST 


LINE COUNT 


THIS TEST OUTPUTS 


EIGHT BELL SIGNALS TO THE PRINTER 


> XXXXXNXXXX 


PT12: 


PT12A: 
18: 


LOGICAL: 


HERE: 


#3720,R0 


@#42,R0 
HERE 


PC. (RO) 


PT12A 


sTMts TEST 

;NEXT TEST 

: TYPE HEADER 

; COUNTER TO R1 
;BELL TO RO 

;SEND IT 

,»DECREMENT COUNT 
>BRANCH IF NOT ZERO 


>DELAY 2 SEC BEFORE RESTARTING 
CHECK 1F UNDER ACT11 OR XXDP 


-CONTINUE TEST SEQUENCE 
>A RESET WAS FORMERLY HERE 


>CHAIN TO NEXT TEST 
-PEPEAT TEST 


;PTI1-- + yer FEED TEST-- THIS TEST PRINTS A "joa COLUMN OF X'S 


SEQ 0059 


SEQ 0082 


a 


ys DZLAC-D 


DZLAC 


D.P 


011536 
011540 
011542 
011546 
011550 
011552 
011556 
011562 
011570 
011572 
011574 
011576 
011602 
011606 
011614 
011616 
011624 
011630 
011634 
011640 
011642 
011646 
011650 
011654 
011656 
011660 
011662 
011666 
011670 
011674 
011700 
011702 
011706 
011710 
011712 
011714 
011716 
011720 
011722 
011726 
011730 
011732 
011736 
011740 
011744 


16-NOV-77 


000017 
011536 
000137 
000017 
011536 
005037 
013704 
012737 
104016 
104007 
014112 
012703 
005237 
023727 
001003 
012737 
012700 
013701 
012702 
104023 
013701 
010300 
004737 
104015 
005301 
003372 
004737 
104012 
012702 
013701 
010300 
004737 
104015 
005301 
003372 
104022 
005302 
001365 
004737 
104014 
005203 
022703 
001341 
004737 
004737 


MACY11 30(1046) 


15: 57 


011576 


012114 
000652 
o000co1 


000041 
012114 
01214 
006001 
014025 
012114 
000002 
000652 


011764 


000005 
000652 


011764 


912112 


900031 
N12114 


, oF 
16:02 PAGE 4-12 


16-NOV-77 SEQ 0060 
LA36 PRINTER TESTS SEQ 0083 
51200 + AXXXXXXXXX 
51300 
51400 ;PTI2-- LIFE TEST 
51500 =; THIS TEST PRINTS 2 FULL LINES OF EACH PRINTABLE 
51600 =; CHARACTER AND OVERPRINTS THE SECOND LINE 4 TIMES. 
51700 =; THIS TEST 1S CONTINUOUS RUNNING ONCE INITIATED. 
51800; LOOPING AUTOMATICALLY ON ITSELF. 
the ; END OF PASS COUNT IS CLEARED WHENEVER TEST IS RESTARTED 
52100 = + XXXXXXXXXX 
52200 
52300 PT17B: 17 + TEST NUMBER 
52400 PT17B NEXT TEST 
52500 JMP PT17D + CONT I NUE 
52600 =PTI?: 17 + TEST NUMBER 
52700 PT17B NEXT TEST 
52800 CLR PASCNT CLEAR PASS COUNT 

2900 Mov WIDTH, RY - INITIALIZE RY 
53000 MOV #1,D1RTN 7>AND DIRECTION OF PRECESS 

3100 PRTHDR 
53200 TYPEM PRINT COLUMN # MESG 
53300 HDRO 
53400 PTi70: MoV #41,R3 SET START CHAR 

3500 INC PASCNT 
53600 CMP PASCNT. #31 +00 31 TIMES 

3700 BNE 208 BRANCH IF NOT DONE 
53800 Mov #1, PASCNT ; START OVER 
53900 20%: MOV #PASMES, RO SET MESG ADDR 
54000 MoV PASCNT, R1 7# TO CONVERT 
54100 MoV #2-R2 -# DIGITS 
54200 BTOASC CONVERT PASCNT TO ASCII 
54300 861%: MoV WIDTH, R1 *SET COLUMN COUNT 
54400 2%. MoV R3,RO >GET CHARACTER 
54500 JSR PC, CKPOS > TIME TO INSERT PASS # 7 
54600 PRINTC > SEND CHAR 
54700 DEC Ri *DECREMENT COUNT 
54800 BGT 2$ BRANCH IF NOT DONE 
54900 JSR PC. ADJP4 ;ADJUST RY POINTER 
55000 CRLF 
55100 MOV #5,R2 >SET OVERPRINT COUNT 
65200 3%: MoV WIDTH, R1 >SET COLUMN COUNT 
55300 «4S: MOV R3.RO GET CHARACTER 
55400 JSR PC, CKPOS > TIME TO INSERT PASS # * 
55500 PRINTC 7 SEND CHAR 
55600 DEC R1 *DECREMENT COUNT 
55700 BGT 4§ >BRANCH IF NOT CONE 
55800 CR > SEND CR 
55900 DEC R2 >DONE OVERPRINTS 7 
56000 BNE 3$ *NO. CONTINUE 
£6100 JSP PC, ADJRY ;ADJUST RY POINTER 
56200 LF > SEND LF 
56300 INC R3 SET NEXT CHAR 
56400 CMP #177.R3 DONE CHAR SET 7 
56500 BNE 1$ *NO. CONTINUE 
56600 JSR PC. ADJRY OFFSET POINTER 3 PLACES 
50700 JSR PC. ADIRY /TO RETAIN WISUAL ALIGNMENT 





G ? a 
MAINDEC-11-DZLAC-D MACY11 30(1046) 16-NOV-77 16:02 PAGE 4-13 SEQ 0061 


DZLACD. P14 16-NOV-77 15: 57 LA36 PRINTER TESTS SEQ 0084 
2352 011750 004737 012032 56800 JSR PC, ADJR4 ; THROUGH END OF PASS 
2354 011754 104007 56900 TYPEM + TYPE END OF PASS MESG 
2355 011756 014006 57900 ENOPAS 
2356 011760 104005 57100 CHAIN » REPEAT TEST 
2357 011762 000705 57200 BR PT170 
2358 57300 


SS OS SS A A nc ce 


H 7 
MAINDEC-11-DZ2LAC-0 MACY11 3001046) 16-NOV-77 16:02 PAGE 4-14 SEQ 0062 


DZLACD. Pid 16-NOV-77 15: 57 LA36 PRINTER TESTS SEQ 0085 
2300 57500 
2361 011764 020401 57600 CKPOS: CMP R4,R1 +1S 1T TIME TO INSERT PASS # ? 
2362 011766 001020 57700 BNE 1$ BRANCH IF NO 
2363 011770 012700 000040 57800 MOV #40,R0 ;PRINT A SPPCE 
2364 011774 104015 57900 PRINTC 
2365 011776 113700 014025 58000 MOVB PASMES. RO ;PRINT MSG OF PASS COUNT 
2366 012002 104015 58100 PRINTC 
2367 012004 113700 014026 58200 MOVB PASMES+1, RC 
2368 012010 104015 58300 PRINTC 
2369 012012 012700 000040 58400 MOV #40,R0 PRINT A SPACE 
2270 012016 104015 58500 PRINTC 
2-371 012020 162701 900003 58600 SUB #3,R1 ;ADJUST R1 3 POSITIONS 
-372 012024 062716 000002 58700 ADD #2, (SP) + ADJUST RETURN PC OVER PRINTC 
227 > 012030 000207 58800 1%: RTS PC 
237% 58900 
2375 012032 005737 012112 59000 ADJP4: TST DIRTN TEST DIRECTION OF PRECESS 
-37e 012036 001013 59100 BNE 1$ /BR IF LEFT 
2377 012040 005204 59200 INC RY ; INCREASE POSITION CNTR 
2378 012042 020437 000652 59300 CMP R4, WIDTH 71S RY > WIDTH ? 
2379 01204 101420 59400 BLOS 3$ :BR IF NOT GREATER 
2380 012050 013704 000652 59500 Moy WIDTH, RY CHANGE DIRECTION 
2381 012054 005304 59600 DEC R4 ; TO 
2382 012056 012737 000001 12112 59700 Mov #1, D1RTN ; LEFT. - 
2383 012064 000411 59800 BR 3$ e 
2384 012066 005304 59900 «§=(18: CEC RY DECREASE POSITION CNTP 
2385 012070 020427 000004 60000 CMP P4Y,#4 :LESS THAN 4 ? * 
2386 012074 002401 60100 BLT 2 ‘BR IF YES e 
2387 012076 000404 60200 Br 3$ *ELSE EXIT e 
2388 012100 012704 900005 60300 2%. MoV #5,P4 >SET RY TO POS 5 
2389 012104 005037 12112 60400 CLR DIP TN > CHANGE DIRECTION TO RIGHT 
2390 012110 000207 e0s0c I$ PTS PC 7EXIT 
2391 60600 
2392 012112 900000 60700) 3 =DIFTN. WORD = 0 DIPECTLON OF PRECESS (O=LEFT) 
2393 e60s00 


3398 O12114 900000 60900 PASCNT WOPD Cc 


od 


MAINDEC-11-0Z2LAC-0 


DILACD. P14 16-NOV-77 15: 57 


| FF 
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LA36 PRINTER TESTS 








SEQ 0063 


—s 


SEQ 0086 | 


OZL 


ACD P 


012116 
012120 
012122 
012124 
012126 
012132 
012134 
012142 
012144 
012146 
012154 
012156 
012160 
012162 
012164 


012166 
012170 
012172 
012:74 
012202 
012206 
012212 
012214 
012216 
012220 
012222 


pty 11-DZ2LAC-D 
11 


16-NOV-77 


000020 
012166 
104016 
104020 
012700 
104010 
022737 
001405 
104017 
117777 
000763 
104007 
014255 
104005 
000757 


000021 
012224 
104016 
012737 
013792 
013700 
104015 
005302 
003373 
104012 
000767 


MACY11 30(1046) 


15: 57 


000036 
000177 


166442 


000060 
000652 
000662 


900700 


16060444 


000662 


J 
16-NOV-77 16:02 PAGE 5 
LA36 ECHO TESTS 


3 -SBTTL LA36 ECHO TESTS 
; KXXXXXXXXX 


; £020-- CHARACTER ECHO TEST-- ALL PRINTABLE AND 
NON-PRINTING CHARACTERS TYPED ON THE KEYBOARD 
ARE USED TO DRIVE THE PRINTER, ONE CHARACTER AT 
A TIME. A “RUBOUT” WILL CAUSE THE TEST TO BE 


: TERMINATED. 

= XMMAXXXKKKX 

£020: 20 ; TEST NUMBER 
£021 SNEXT TEST 
PRTHOR TYPE HEADER 

15: READ [GO WAIT FOR KEYBOARD INPUT 
MoU #30. .R0 “DELAY FOR HALF DUPLEX 
DELAY 
CHP #177. TEMPCH > CHECK IF RUBOUT 
BEG 23 “BRANCH IF YES 
PENT “NO, CHECK PRINTER READY 
MOVB © aTKB. aTPB READY, ECHO CHARACTER 
BR 15 

25. TYlEM PRINT TERMINATION MESSAGE 
ECOEND 
CHAIN :CHAIN TO NEXT TEST 
BR 1S “REPEAT TEST 

2 XXXHHXKAY 


;£021-- LINE ECHO TEST, FAST RATE-- THIS TEST WILL 
CAUSE THE CONTINUAL PRINTING OF "Q" AT THE MAXIMUM 
RATE UNTIL EITHER ANOTHER CHARACTER !S SELECTED 
BY PRESSING A KEY ON THE KEYBOARD OR TERMINATION BY THE 


RUBOUT. 
> XXXXXXXXKX 
E021: 2 - TEST NUMBER 
E022 NEXT TEST 
PRTHDR - TYPE HEADER 
EQ21A: MoV #60, PEPT >CHARACTER TO BE REPEATED '0) 
$: MoV WIDTH, R2 >SET COLUMN COUNT 
28: MOV REPT. RO > GET CHAR 
PRINTC >PRINT CHAR 
DEC P2 -DEC COLUMN COUNT 
Bat 2$ >FINtSH LINE 
CPLF >SENC A CP AND LF 
BR 1$ 


SEQ 0064 
SEQ 0087 | 


MAINDEC-11-DZ2LAC-0 
DZLACD. P11 


2447 
2448 
2449 
2450 
2451 
2452 
2453 


012224 


MACY11 30(1046) 


16-NOV-77 15: 57 


000022 
012476 
104016 
012737 
012702 
013700 
104015 
005302 
001404 
012700 
164010 
000767 
104012 
000763 


000060 000662 
000652 
000662 


003410 


K 7? 
16-NOV-77 16:02 PAGE 5-1 
LA36 ECHO TESTS 


phe 


+ XXXXXXXXXX 
£022-- LINE ECHO TEST. SLOW RATE-- SAME AS E021 EXCEPT 
: THAT A DELAY IS INTRODUCED BETWEEN CHARACTERS 
; TO PRODUCE A LCV ACTION 
j MXXXXKXKKX 
£022: 22 
E023 
PRTHOR ; TYPE HEADER 
—022A: MOV #60, REPT ;LOAD 0 AS INITIAL CHARACTER 
1S: MoV WIDTH, RZ ;SET COLUMN COUNT 
23: MoV REPT. RO ;GET CHAR 
PRINTC ;PRINT CHAR 
DEC R2 ;DEC COLUMN COUNT 
BEQ 34 ;BRANCH iF DONE LINE 
Mov #3410,R0 
DELAY ;DELAY 1.8 SEC. 
er 23 ; OUTPUT NEW CHAR. 
3$ CRLF > SEND A CR AND LF 
BR 1% 


SEQ 0065 
SEQ 0088 | 














MAINDE 
DZLA 


2470 
2471 
2472 
2473 
2474 
2475 





C-11-02 
CD. P11 


012272 
012276 
012302 
012306 
012312 
012316 
012322 
012326 
012332 
012336 
012342 
012346 
012352 
012356 
012362 
012366 
012372 
012376 
012402 
012406 
012412 
012416 
012422 
012426 
012432 
012436 
012442 
012446 
012452 
012456 
012462 
012466 
012472 


LAC-D 
16-NOV-77 


052516 
047523 
052123 
052105 
047505 
047105 
041501 
042502 
051502 
052110 
O43114 
052126 
043106 
051103 
047523 
044523 
046104 
041504 
041504 
041504 
041504 
040516 
054523 
052105 
040503 
046505 
052523 
051505 
051506 
051507 
051522 
0£1525 
050123 





MACY11 30(1046) 
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020114 
020110 
020130 
020130 
020124 
020121 
020113 
020114 
020040 
020040 
020040 
020040 
020040 
020040 
020040 
020040 
020105 
020061 
020062 
020063 
020064 
020113 
020116 
020102 
020116 
020040 
020102 
020103 
020040 
020040 
020040 
020040 
020040 





> 
16-NOV-77 16:02 PAGE 5-2 
LA36 ECHO TESTS 


+ RXKKEEKEKE 


, 


THIS FOLLOWING TABLE 1S USED BY TEST E023 


eTtt ttt ttt 


MONIC: 


Bs ya hae A Sa Siu, TA la, A Sigg lg SR, ag ee a Mi lg i es 





SEQ 0066 
SEQ 0089 


' 
+ ee 


M ? 
16:02 PAGE 5-3 


an ie 11-DZ2LAC-D MACY11 30(1046) 16-NOV-77 SEQ 0067 | 
DZLACD. P11 16-NOV-77 15:57 LA36 ECHO TESTS SEQ 0090 | 
2512 11600 + AXXXXXAXXXK 
2513 11700 
2514 11800 ;€023-- CHARACTER CODE TEST-- ANY CHARACTER SELECTED | 
2515 11900; WILL BE ECHOED ALONG WITH ITS OCTAL CODE. 
2516 12000 ; A MNEMONIC WILL BE PRINTED INSTEAD OF THE CHARACTER 
2517 12100 =; IF IT 1S A NON-PRINTING CHARACTER. 
2518 12200 =; THE PARITY OF THE RECEIVED CODE WILL ALSO BE 
2519 12300 =; INDICATED AS EITHER EVEN OR ODD 
2520 12400 =; 
2521 12500 + XXXXXXXXXX 
2522 12600 =; 
2523 012476 000023 12700 = E023: 23 ; TEST NUMBER 
2524 012500 012020 12800 E024 NEXT TEST 
2525 012502 104016 12900 PRTHOR + TYPE HEADER 
2526 012504 104020 13000 «1%: READ +GO WAIT FOR CHARACTER 
2527 012506 012700 000036 13100 MOV #30. ,R0 DELAY FOR HALF DUPLEX 
2528 012512 104010 3200 DELAY 
2529 012514 023727 000700 9000041 13300 CMP TEMPCH, #41 + TEST IF CHAR IS PRINTABLE 
2530 012522 103015 13400 BHIS 3$ *BRANCH IF IT IS 
2531 012524 004737 012660 13500 JSR PC, STRLN STORE CODE INTO MESSAGE 
2532 012530 113700 000700 13600 MOVB TEMPCH, RO +GET CODE AGAIN 
2533 012534 006300 13700 ASL RO *MULT BY 2 
2534 012536 006300 13800 ASL RO *MULT BY 4 
2535 012540 062700 012272 13900 ADD #MONIC, RO ;ADD ADOR OF MNEMONIC TABLE 
2536 012544 004737 012736 14000 JSR PC, MOWNUM »MOV MNEMONIC TO MESSAGE 
2537 012550 104000 14100 82%: TYPE ; TYPE CODE AND MNEMONIC 
2538 012552 014304 14200 E023n ;ADORESS OF MESSAGE 
2539 012554 000753 4300 BR 1$ >GO WAIT FOR NEXT CHARACTER 
2540 012556 023727 000700 000177 14400 _~ = 3%: CMP TEMPCH, #177 + TEST IF CHAR 1S A RUBOUT 
2541 012564 001421 14500 BEQ 4§ BRANCH IF RUBOUT 
2542 012566 012701 013010 14600 MOV #MG24,R1 
2543 012572 113721 000700 14700 MOVB TEMPCH, (R1)+ 
2544 012576 112721 O00040 14800 MOVB #40, (R1)+ 
2545 012602 112721 000040 14900 MOVB #40, (R1)+ 
2546 012606 112721 000040 15000 MOVB #40. (R1)+ 
2547 012612 004737 012660 15100 JSR PC, STRLN >STORE CODE INTO MESSAGE 
2548 012616 012700 013010 15200 MOV #MG24, RO ADDR OF CHAR INTO RO 
2549 012622 004737 012736 15300 JSR PC, MOVNUN ;MOVE CHAR INTO MESSAGE 
2550 012626 000750 15400 BR 2$ - TYPE MESSAGE 
2551 012630 004737 012660 15500 §=4S: JSR PC, STRLN *RUBOUT, CONVERT AND STOR CODE 
2552 012634 012700 013014 15600 MOV #MG25. RO -ADOR. OF DEL INTO RO 
2553 012640 004737 012736 15700 JSR PC, MOVNUM ;MOVE DEL INTO MESSAGE 
2554 012644 104090 15800 TYPE ; TYPE MESSAGE 
2555 012646 014304 15900 E023m ADDR OF MESSAGE 
2556 012650 104007 16000 TYPEN 
2557 012652 014255 16100 ECOEND 
2558 012654 104005 16200 CARIN CHAIN TO NEXT TEST 
2559 012656 000712 16300 BR 1$ REPEAT TEST 
2560 012660 012702 9000003 16400 STRLN: MOV #3,R2 COUNT OF 3 TO RZ 
2561 012664 012701 014306 16500 MOV #LINES.R1 ;ADDR OF MESG TO R1 
2562 012670 062701 900003 16600 ADD #3,R1 >POINT TO LAST SPACE IN MESG 
2563 012674 013700 900704 16700 3§=18: MOV PCHAR, RO ;MOVE OCTAL CODE TO RO 
2564 012700 042700 177770 16800 BIC #177770,R0 SAVE LS OCTAL CHAR 
2565 012704 062700 000060 16900 ADD #60, RO MAKE ASCII 
2566 012710 110041 17000 MOVB RO. -(R1) +MOVE INTO MESG 
2567 012712 005302 17100 DEC *DECREMENT CHAR COUNTER 































ACD. P 


2568 012714 
2569 012716 
2570 012722 
2571 012726 
2572 012732 
2573 012734 
2574 012736 
2575 012742 
2576 012746 
2577 012750 
2578 012752 
2579 012754 
2580 012760 
2581 012762 
2582 012766 
2583 012770 
2534 012774 
2585 013000 
2586 013002 
2587 013004 
2588 013006 


2590 013019 


2594 013014 


ak oe 11-DZLAC-D 
O2L 11 
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001407 


012702 
112021 
005302 
001375 
C00207 


020040 


042504 


000704 
000704 
000704 


014312 
000004 


000702 


014354 


014360 
000004 


020040 


R20114 


MACY11 30(1046) 


17200 
17300 
17400 
17500 
17600 
17700 
17800 
17900 
18000 
18100 
18200 
18300 
18400 
18500 
18600 
18700 
18800 
18900 
19000 
19100 
19200 
19300 
19400 
19500 
19600 
19700 
19800 
19900 
20000 


16-NOV-77 
LA36 ECHO TESTS 





23: 
MOVNUNM: 


1$: 


MG24: 


MG25: 


N 7 
16:02 PAGE 5-4 


ASCII 
_ EVEN 


P 

#L INESA, R1 

#4,R2 
(RO)+, (R1)+ 

R2 

1$ 

PARITY 

23 

#E VEN, RO 

3$ 

#000, R0 

#4,R2 
(RO) +, (R1)+ 
2 

4s 


/DEL 7 


BRANCH IF 3 MQVED 
;NOT THREE, SHIFT NEXT OCTAL 
CHARACTER TO THE RIGHT 


[CONVERT AND STORE NEXT CHAR. 


+RETURN TO CALLER 

+ADOR OF LINES IN R1 
COUNT OF 4 TO R2 

;MOV 4 CHARS TO MESG AREA 
;DECREMENT COUNTER 
BRANCH IF NOT ALL DONE 

+ TEST PARITY FLAG 

+BRANCH IF ODD PAR 


+ SET ADDRESS FOR EVEN PARITY MESG 


; CONTIN 


;COUNT OF 4 T 

+MOVE 4 CHARS TO MESG AREA 
;DECREMENT COUNTER 

> BRANCH IF NOT DONE 

> RETURN 


; SAVE CHARACTER CODE 


;MNEMONIC FOR PUBOUT 


SEQ 0068 
SEQ 0091 


UE 
+ SET ADDRESS i PARITY MESG 


Rae a ee ec ee eS a ee a ee Se 


MAINDEC-11-DZLAC-D 


DZLACD. P11 


2611 013020 
2612 012022 


2629 013110 


2633 013112 
2634 013116 
2635 013120 
2636 013124 
2037 013126 
2638 013132 
2639 013136 
2640 013140 
2641 013142 
2642 013146 
2643 013150 
2644 013152 
2645 013154 
2646 013156 
2647 013160 
2648 013162 
2649 013164 
2650 013166 


MACY11 30(1046) 
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000024 
013566 
104016 
005001 
012702 
104020 
012700 
104010 
022737 
001440 
022737 
001413 
020127 
103361 
113722 
005201 
104017 
113777 
000751 


020227 
001403 
113722 
104013 
012702 
021227 
001733 
112290 
020027 
001767 
104015 
000772 
104007 
014255 
104005 
000721 
000003 
000400 


013164 
0000 36 
000177 
000003 
000400 
000700 


000700 


013164 
000700 
013164 
000003 


000003 


000700 
000700 


165510 


8 8 
16-NOV-77 16:02 PAGE 5-5 SEQ 0069 
LA36 ECHO TESTS 





+ XXXXXXXXXX 

*E024-- SELECTED PATTERN ECHO TEST-- SELECT 1 TO 256 
CHARACTERS. EACH WILL BE ECHOED 

AND STORED UNTIL THE CNTL/C IS SELECTED 

AT THAT TIME ALL CHARACTERS WILL BE PRINTED AS 

A CONTINOUS STRING UNTIL EITHER THE RUBOUT IS 
SELECTED TO TERMINATE OR THE CNTL/C IS SELECTED 
AGAIN. A TERMINATEING CNTL/C FOLLOWED BY ANOTHER 
CNTL/C WILL ALWAYS CAUSE THE LAST INPUTTED STRING TO 
BE PRINTED. A TERMINATING CNTL/C FOLLOWED BY A CHARACTER OTHER THAN A 
RUBOUT WILL CAUSE A NEW STRING TO BE INPUTTED 


De Ve Ve Ve Be Ve Be Be Ge 


» XXXXXXXXXXK 
E024: 24 + TEST NUMBER 
E025 NEXT TEST 
PRTHOR + TYPE TEST HEADER 
EO24B: CLR R1 +CLEAR CHARACTER COUNT 
MoV #BUFR,R2 ;ADDRESS OF BUFFER TO R2 
1$: READ ;WAIT FOR INPUT 
MOV #30. ,R0 DELAY FOR HALF DUPLEX 
DELAY 
CMP #177, TEMPCH ; TEST IF RUBOUT 
BEQ TERM BRANCH IF RUBOUT 
ce #3, TEMPCH > TEST IF CNTL-C 
BEG OUTPUT BRANCH IF CNTL-C 
CMP R1, #256. YES, CHECK IF CHAR CNT IS EQ, GT 256 
BHIS 1$ BRANCH IF YES. IGNORE CHAR 
MOVB TEMPCH, (R2)+ STORE CHAR INTO BUFFER 
INC R1 > INCREMENT CHARACTER COUNT 
PRNT >CHECK IF PRINTER READY 
MOVB TEMPCH. dTPB ECHO CHAR 


BR 1$ ;GO WAIT FOR NEXT CHAR . 
: SECTION TO OUTPUT CONTINOUS STRING ; 
OUTPUT: CMP R2, BUFR ;CHECK IF POINTER 1S AT START OF TABLE 
BEQ 


1% : YES, BRANCH 
MOVB TEMPCH, (R2)+ NO, STORE C IN TABLE 


SCPLF SEND A CR LF 
1$: MOV #BUFR,R2 BUFFER ADDRESS TO R2 
CMP (R2), #3 ;CHECK IF FIRST CHAR IS C 
BEQ E024B > YES, LOOK FOR INPUT AGAIN 
28: MOVB (R2)+,R0 GET CHARACTER 
CMP RO, #3 ;DONE STRING? 
BEQ 1$ > YES, RESTART STRING 
PRINTC PRINT CHAR 
BR 2$ > CONTINUE 
TERM: TYPEM ; OUTPUT TERMINATION NESSAGE 
ECOEND 
CHAIN ;CHAIN TO NEXT TEST 
BR EO24B ;REPEAT TEST 
BUFR: 3 > INITIALIZE FIRST CHAR AS CNTL-C IN TABLE 
-BLXB = 256. >256 CHARACTER BUFFER 


SEQ 0092 


ap Ht ha -D2Z2LAC-D 


DZLACD. P 


013566 
013570 
013572 
0123574 
013602 
013604 
013606 
013610 
013612 
013614 
013616 
013620 
013624 
013626 
013634 
013636 
013644 
013646 
013650 
013656 
013660 
013662 
012664 
013666 
013670 
013672 
O13e7% 


16-NOV-77 


000025 
012116 
104016 
023727 
103427 
104007 
014130 
000402 
104000 
014130 
104920 
012700 
104010 
023727 
103770 
022737 
001410 
104017 
113777 
104013 
000754 
104007 
014230 
104007 
014255 
104005 
000737 


MACY11 30(1046) 
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000652 


00003. 
000700 
00017? 


000700 


000101 


000040 
900700 


164742 


“CC 8 
16:02 PAGE 5-6 


SEQ@ 0070 
SEQ 0093 


5 £025-- BELL ECHO TEST-- A MESSAGE |S PRINTED AND 

THE TEST WAITS FOR SOME PRINTABLE CHARACTER 

TO BE SELECTED ON THE KEYBOARD (GTO40). THIS 
TEST 1S VALID ONLY IF THE PAPER WIDTH IS GT 64 
COLUMNS. IF LT64 COLUMNS AN ILLEGAL BELL TEST 


16-NOV-77 

LA36 ECHO TESTS 
25600 + AXXXXXXXXXX 
25700 
25800 
25900 =; 
26000: =; 
26100 ; 
26200 =; 
26300 =; MESSAGE IS PRINTED 
26400 =; 
26500 + XXXXXXXXXXX 
26600 =C; 
26700 =E025: 25 
26800 £020 
26900 PRTHDR 
27000 1S: CMP WIDTH, #101 
27100 BLO 4S 

27200 TYPEM 

27300 EO25MA 
27400 BR 3$ 
27500 = 28: TYPE 
27600 EO25MA 
27700 ~=— ss 38: READ 

27800 MoV #30.,R0 
27900 DELAY 
28000 CMP TEMPCH, #40 
28100 BLO 3$ 

28200 CMP #177, TEMPCH 
28300 BEQ 55 

28400 PRNT 
28500 MOVB TEMPCH, aTPB 
28600 SCRLF 

28700 BR 2$ 

28800 «4S. TYPEM 

28900 £O25MB 

29000 5%: TYPEM 

29100 ECOEND 

29200 CHAIN 

29300 BP 1% 


; TEST NUMBER 

NEXT TEST HEADER 

PRINT HEADER 

TEST IF COLUMN COUNTIS EQ,GT 64 
BRANCH IF NOT 

; TYPE TEST MESG 


;WAIT FOR CHAR 
; TYPE TEST MESG ON TERM CHAR RCVD ON 


;WAIT FOR OPERATOR RESPONSE 
;DELAY FOR HALF DUPLEX 


> TEST IF PRINTABLE 

BRANCH IF NON-PRINTABLE 

>CHECK IF CHAR IS RUBOUT 

BRANCH IF YES 

>CHECK IF PRINTER IS READY 
PRINT CHAR. (BELL SHOULD SOUND) 
+ SEND : CRLF 

; REPEAT 

> TYPE ERROR MESSAGE 


>PRINT TERMINATION 


EXIT TO NEXT TEST 
>REPEAT TEST 


MAINDEC-11-DZ2LAC-D 


DILACD Pid 


2671 


MACY11 30(1046) 
16-NOV-77 15: 57 


0 8 
16-NOV-77 16:02 PAGE 5-7 


LA36 ECHO TESTS 


SEQ 0071 
SEQ 0094 


a nn nr ee en ne ean 


MAINDEC-11-DZLAC-D 
DZLACD. P11 


-b96 


2704 


2705 


2706 


2707 
2708 
2709 


2710 


013676 
013704 
013712 
013720 
013725 
013732 
013740 
013746 
013754 
013756 
013764 
013772 
014000 
014006 
014014 
014022 
014025 
014032 
014034 
014042 
014047 
014054 
014062 
014070 
014076 
014104 
014112 
014120 
014126 
014130 
014136 
014144 
014152 
014160 
014165 
014172 
014200 
614206 
014214 
01422 

014230 
014236 
014244 
014252 
014255 
014262 
014270 
014276 
014304 
014306 
014312 
014320 
014324 
014332 


16-NOV-77 15 


001007 


041505 


007600 
042504 
042055 
041455 
031501 
046522 
042040 
051517 


030461 
030514 


030060 


047117 
023040 
020060 
051447 
051105 
100124 
007600 
020124 
020060 
047115 


042520 
050040 
041101 
040510 
051105 
042116 
042524 


042105 


020040 
020049 
000200 
051412 
020124 


MACY11 30(1046) 
: 57 


040515 
026503 
046132 

200 
020066 
047111 
040511 
044524 


023040 
020061 
043122 
000012 
020104 
051501 


100060 
047523 


047503 
100123 


040440 


020110 
047115 


047510 
020124 
047111 
000200 


020040 


046105 
042524 


MISC. DIAGNOSTIC MESSAGES 
{7><2>CACRLF ><17>/MAINDEC-11-DZLAC-C/<ACRLF > 


7LA36 TERMINAL DIAGNOSTIC/<ACRLF > 


7DL11 & KL11 INTERFACE/<ACRLF><12> 


<ACRLF><12>7END OF PASS / 


/0000/7<ACRLF><12> 
<ACRLF>/CONSOLE & / 
700 DL11'S UNDER TEST/<ACRLF><12> 


€7><2>ACRLFD><17><12>/7TEST #7 
7000 COLUMNS/<ACRLF >< 12> 


/TYPE ANY PRINTABLE CHARACTER / 


MD AL ISTEM FOP DELL... wn een ccm, i 


CACRLF>/NCT ENOUGH COLUMNS. <ACPLF > 
CACPLF>/ECHO TEST TERMINATED.’ <ACPLE > 


, , 
/ / ;MESG FOR TEST E024 
/ /<ACRLE > 


ait NOV-77 16:02 PAGE 6 

MISC. DIAGNOSTIC HESSAGES 
00100 . SBTTL 
00200 =: 
00300 STARTM: .ASCII 
00400 ASCII 
00500 .ASCIZ 
00690 ENDODPAS: . ASCII 
06700 PASMES: .ASCIZ 
GO800 3=OL1iS: .ASCII 
00900 ODLIIS!1: .ASCIZ 
01000 HORMSG: ASCIZ 
01100 HORO: ASCIZ 
01200 EQ25MA: ASCII 
01300 .ASCIZ 
£1400 EQZ5MB: . ASCI 
01500 ECOEND: ASCIC 
01600 €023m: .ASCII 
01700 LINES: ASCII 
01800 LINESA: .ASCIZ 
01900 MESG3: .ASCIZ 


CACRLF><17><12>/SELECT TEST NUMBER 


SEQ 0072 


SEQ 0095 | 


| 
| 
' 














DZLACD. P11 


014340 
014346 
2711 014354 
2712 014360 
2713 014364 
014372 
014400 
014406 
2714 014407 
014414 
014422 
014430 
014436 
O14444 
014452 
014460 


oot 


MAINDEC-11-DZLAC-0 
16-NOV-77 


052123 
042502 


003466 


000001 


MACY11 30(1046) 
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047040 
020122 
047105 
020104 
042520 
041440 
052103 


042523 
053524 
053523 
051040 
020124 
054522 
020122 

coo 


046525 
000040 


040440 
040510 
051105 


051440 
051101 
052111 
043505 
042515 
040440 
033461 


16-NOV-77 
MISC. DIAGNOSTIC MESSAGES 


02000 
02100 
02200 


02300 


2400 
02500 


16: 02 


PAGE 


- ASCII 
/ ASCII 
.ASCIZ 


-ASCIZ 


7EVEN/ 
7000 / 
7TYPE ANY CHARACTER/ 


7USE SOFTWARE SWITCH REG AT MEMORY ADDR 176/<7> 


F 8 ee ee 
6-1 SEQ 0073 
SEQ 0096 


G 8 
MAINDEC-11-DZ2LAC-D MACY11 30(104%6) 16-NOV-77 16:02 FAGE 7 SEQ 0074 


-}OZLACD. P11 16-NOV-77 15: 57 SYMBOL TABLE SEQ 0097 . 
ACRLF = 000200 CHAINN 001412 EO25NA 014130 PRGTAB 002522 START3 000772 
ADIJRY 012032 CHAINY 001534 EOZ25MB 014230 PRINTC= 104015 STLSPV 003376 
ADTENP 004070 CHALT = 104006 ERR 003310 PRNT = 104017 STLSRV 003346 
APEAD = 104021 CHLT 000720 ERRHLT 003344 PRTHDR= 10401€ STPCHV= 104004 
ATO 005276 CKPOS 011764 ERROR = 104001 PRTYY = 000200 STPPA 003414 
ATOX 005300 CNTLSW 000634 EVEN 014354 PRTY? = 000340 STPRA 003364 
ATi 005330 CNTR 000716 FORWD = 104024 PSW = 177776 STRORV= 104003 
AT10 005754 CNVCTR 004062 FORWOR 003604 PTO 007402 STRLN 012660 
ATI1 006012 CONADD 000602 FORWOB 003612 PT1 007456 SWREG 000176 
AT12 006052 CONIT 003700 FSTOL 000632 PT10 011266 TEMP 000712 
AT13 006126 CONSET 003704 HORMSG 014076 PT11 011424 TEMPCH 000700 
ATI4 006206 CONVEC 000604 HORO 014112 PT12 011456 TENPWR 004066 
ATS 006272 COUNT3 000666 HERE 011532 PT12A 86011464 TERM 013154 
ATl6 006372 CR = 104022 ICTR 000660 PT17 011546 TESTC 002460 
ATI? 006440 CRBUF Q00646 IDEZ 007706 PT17B) «=6. 011536 TIMER 000672 
ATe 005362 CRLF = 104012 INCHK 000710 PT17D §=©.1011576 TKB 000614 
ATlO 006510 CTRA 000650 LEVEL 000654 PT2 007600 TKLVL 000624 
AT21 006602 CURTST 000676 LF = 104614 PT3 010164 TKS 000612 
AT22 006702 DELAY = 104010 LFCNT OC0706 ‘ PTY 010304 TKYVTR 000622 
AT23 007010 DIGIT 004064 LINES 010444 ~ PTS 010462 TPB 000620 
AT24 007122 DIRTN 012112 LINES 014306 PTSAL 010630 TPBS 003774 
AT25 007222 DISPRE 000174 LINESA 014312 PT6 010666 TPLVL 000630 
AT26 007300 DLADR 000606 LOGICA 011522 PT? 011054 TPS 000616 
AT3 005414 OLCNT 000656 LS!11 = 001000 READ = 104020 TPSS 003772 
AT4 005446 DLNR 000610 MACHER 000004 READC = 104025 TPVTR 000626 
ATS 005536 DLY 003426 MESG3 014324 READ! 004202 TTYCTL= 104011 
AT6 005614 OL11S 014034 MG24 013010 REF 010414 TTY1 001776 
AT? 005704 OL11S1 014047 MG25 013014 REPT 000662 TTY1B 002062 
Bi70 = 000001 ECOEND 014255 MONIC 012272 RESTRT 003506 TYP 003076 
BiT1 = 000002 EHALT = 104002 MOVNUM 012736 RTNNO 00636 TYPE = 104000 
BiT10 = 002000 EHLT 003336 NEXT 001654 SAVR6 003504 TYPEM = 104007 
BiTi1 = 004000 EMTINT 002722 NEXT1 001674 SCOPSW= 040000 TYPM 003154 
BIT12 = 010000 EMTTRB 002776 NITRSW= 004000 SCOPTR 000642 WAITF 001700 
BiT13 = 020000 ENDPAS 014006 NOSHR 014407 SCRLF = 104013 WIOTH C00652 
BiT14 = 040000 END2 001332 NPCODE 010137 SELHLT 000734 XCSR 000670 
BiT15 = 100000 END2A 001320 NXTST 000640 SK!P 001630 SAREAD 003639 
BiT2 = 000004 END3 001262 000 014360 SPRRET 003072 SBTASC 003776 
BiT3 = 000010 END4 001334 OPEN = 000000 SPBOT 90600 SCR 003216 
BiT4 = 00002 £020 012116 OPMSG 014364 SFC 007570 SCRLF 903204 
B'TS = 000040 E021 012166 OUTPUT 013112 SPCNT 000674 SFORWD 003552 
BiTe = 000100 E021A 012174 PARITY 000702 SPSP 007550 SLF 003206 
Bit? = 000200 E022 012224 PASCNT 012114 SP2 007562 SPRHDR 003226 
BiT8 = 000400 EQ22A 012232 PASMES 014025 SR 000714 SPRNT 004304 
BiT9 = 001000 £023 012476 PCHAR 000704 START 001016 SPRTC OO4314 
BRCTR 000664 EQ23M 014304 PFAIL 003450 STARTM 013676 SREAD 004102 
BTOASC= 10402 EO24 01302 POPSP = 005726 STARTX 001024 SREADC 004174 
BUFR 013164 EQ24B 013026 POPSP2= 022626 STAPT1 000736 SSCRLF 003132 
CHAIN = 104005 E02 013566 PRGID § 000644 STAPTZ 600754 = 014463 


ABS. 014463 coo 


ERRORS DETECTED: 9 
DZLACO. OZLACD/DOC=02LACO. DIAG 


H 8 
MAINDEC-11-OZLAC-D MACY11 30(1046) 16-NOV-77 16:02 PAGE 7-1 SEQ 0075 
DZLACD. Pil 16-NOV-77 15: 57 SYMBOL TABLE SEQ 0098 


PUN-TIME: 2 6 .2 SECONDS 
PUN-TIME RATIO: 249/9=27 2 
COPE USED. Sk (9 PAGES) 


DOCUMENT PAGES: 75 


